Mercurial > emacs

view lisp/term/linux.el @ 38231:a94c26975e95

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Explain purpose of mode hooks. Xref to Tags from Imenu. Don't use "sections or definitions" in Imenu. Cindex "pretty printer". Mention LINEFEED. Explain uses of values of lisp-indent-function. Explain why C-M-DEL is sometimes not available. Doc values of hs-isearch-open. Minor cleanups.
author Richard M. Stallman <rms@gnu.org>
date Fri, 29 Jun 2001 03:23:32 +0000
parents 2253ec0e71ca
children 67b464da13ec
line wrap: on
line source

;; 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)))