Mercurial > emacs
changeset 17985:601f43ce92b5
(encoded-kbd-mode): Fix typo in doc-string.
(encoded-kbd-set-coding-system): Deleted.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Wed, 28 May 1997 03:35:34 +0000 |
| parents | 4882d58acf01 |
| children | 43fa316b0eca |
| files | lisp/international/encoded-kb.el |
| diffstat | 1 files changed, 1 insertions(+), 15 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/encoded-kb.el Wed May 28 03:35:33 1997 +0000 +++ b/lisp/international/encoded-kb.el Wed May 28 03:35:34 1997 +0000 @@ -227,7 +227,7 @@ ;;;###autoload (defun encoded-kbd-mode (&optional arg) "Toggle Encoded-kbd minor mode. -With arg, turn Keyboard-kbd mode on in and only if arg is positive. +With arg, turn Keyboard-kbd mode on if and only if arg is positive. When in Encoded-kbd mode, a text sent from a terminal keyboard is accepted as a multilingual text encoded in a coding system @@ -284,18 +284,4 @@ (setq current-input-method nil)) (force-mode-line-update)) -;;;###autoload -(defun encoded-kbd-set-coding-system (coding-system) - "Activate Encoded-kbd mode appropriately for a terminal using CODING-SYSTEM. -If you specify nil for CODING-SYSTEM, Encoded-kbd mode is toggled off." - (interactive "zCoding system: ") - (if window-system - (error "Should run emacs on an ordinary terminal")) - (if (check-coding-system coding-system) - (progn - (set-keyboard-coding-system coding-system) - (encoded-kbd-mode 1)) - (set-keyboard-coding-system nil) - (encoded-kbd-mode 0))) - ;;; encoded-kb.el ends here