Commit | Line | Data |
---|---|---|
0a10297a | 1 | ;; -*- no-byte-compile: t -*- |
57cf80bf RS |
2 | ;; The Linux console handles Latin-1 by default. |
3 | ||
dcaa5925 KH |
4 | (unless (terminal-coding-system) |
5 | (set-terminal-coding-system 'iso-latin-1)) | |
952e6ec2 KH |
6 | |
7 | ;; Make Latin-1 input characters work, too. | |
8 | ;; Meta will continue to work, because the kernel | |
9 | ;; turns that into Escape. | |
10 | ||
11 | (let ((value (current-input-mode))) | |
12 | ;; The third arg only matters in that it is not t or nil. | |
13 | (set-input-mode (nth 0 value) (nth 1 value) 'iso-latin-1 (nth 3 value))) | |
60370d40 | 14 | |
ab5796a9 | 15 | ;;; arch-tag: 5d0c4f63-739b-4862-abf3-041fe42adb8f |
60370d40 | 16 | ;;; linux.el ends here |