Mercurial > emacs
view lisp/term/linux.el @ 47911:e07cfa93f2f3
(cp-make-translation-table): Use
ucs-mule-to-mule-unicode.
(cp-fix-safe-chars): Fix typo.
(non-iso-charset-alist): Don't define.
(cp-make-coding-system): Use utf-8-translation-table-for-decode.
Define translation-table-for-input.
(cp866): Reinstate.
(alternativnj): Don't define alias.
(koi8-u): Deleted.
author | Dave Love <fx@gnu.org> |
---|---|
date | Thu, 17 Oct 2002 15:30:28 +0000 |
parents | 33d53d287ee4 |
children | 695cf19ef79e d7ddb3e565de |
line wrap: on
line source
;; -*- no-byte-compile: t -*- ;; The Linux console handles Latin-1 by default. (unless (terminal-coding-system) (set-terminal-coding-system 'iso-latin-1)) ;; Make Latin-1 input characters work, too. ;; Meta will continue to work, because the kernel ;; turns that into Escape. (let ((value (current-input-mode))) ;; The third arg only matters in that it is not t or nil. (set-input-mode (nth 0 value) (nth 1 value) 'iso-latin-1 (nth 3 value))) ;;; linux.el ends here