From: Dave Love Date: Thu, 18 Nov 1999 23:49:29 +0000 (+0000) Subject: (input-mode-8-bit): Fix the customization. X-Git-Tag: emacs-pretest-21.0.90~6049 X-Git-Url: https://code.delx.au/gnu-emacs/commitdiff_plain/618bd252b543714748dc181d888ba9263b5d1057 (input-mode-8-bit): Fix the customization. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index a3bbf8c899..31a23836fd 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +1999-11-18 Dave Love + + * simple.el (input-mode-8-bit): Fix the customization. + 1999-11-18 Gerd Moellmann * international/iso-acc.el (iso-languages): Add more diff --git a/lisp/simple.el b/lisp/simple.el index 084bf39e8c..bc78fc66f9 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -3501,17 +3501,20 @@ or go back to just one window (by deleting all but the selected window)." (define-key global-map "\e\e\e" 'keyboard-escape-quit) -(defcustom input-mode-8-bit nil - "Toggle whether 8-bit keyboard input is accepted. +(defcustom input-mode-8-bit t + "Control acceptance of 8-bit keyboard input. This may be useful for inputting non-ASCII characters if your keyboard -can generate them. +can generate them. It is not necessary to change this under a window +system which can distinguish 8-bit characters and Meta keys. Setting this variable directly does not take effect; use either M-x customize or the function `set-input-mode'." :set (lambda (symbol value) (let ((mode (current-input-mode))) (set-input-mode (nth 0 mode) (nth 1 mode) value))) :initialize 'custom-initialize-default - :type 'boolean + :type '(choice (const :tag "8-bit input for a Meta key" t) + (const :tag "Direct 8-bit character input" 0) + (const :tag "Assume top bit is parity and ignore" nil)) :version "21.1" :link '(custom-manual "Single-Byte European Support") :group 'keyboard)