From 22e4ec9848353b29fdc419054855331cc61dd3cf Mon Sep 17 00:00:00 2001 From: Dave Love Date: Tue, 26 Oct 1999 16:27:51 +0000 Subject: [PATCH] (input-mode-8-bit): New defcustom. --- lisp/simple.el | 15 +++++++++++++++ 1 file changed, 15 insertions(+) diff --git a/lisp/simple.el b/lisp/simple.el index 7482bf2cfe..245727455e 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -3491,6 +3491,21 @@ or go back to just one window (by deleting all but the selected window)." (bury-buffer)))) (define-key global-map "\e\e\e" 'keyboard-escape-quit) + +(defcustom input-mode-8-bit nil + "Toggle whether 8-bit keyboard input is accepted. +This may be useful for inputting non-ASCII characters if your keyboard +can generate them. +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 + :version "21.1" + :link '(custom-manual "Single-Byte European Support") + :group 'keyboard) (defcustom mail-user-agent 'sendmail-user-agent "*Your preference for a mail composition package. -- 2.20.1