Mercurial > emacs
comparison lisp/language/european.el @ 19661:8cde4cefae44
(setup-8-bit-environment): Inhibit message when loading latin-N.el.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Mon, 01 Sep 1997 19:25:12 +0000 |
parents | b931375072b2 |
children | dce0d588d203 |
comparison
equal
deleted
inserted
replaced
19660:fa3d4e7a76d9 | 19661:8cde4cefae44 |
---|---|
55 (if input-method | 55 (if input-method |
56 (setq default-input-method input-method)) | 56 (setq default-input-method input-method)) |
57 | 57 |
58 ;; If this is a Latin-N character set, set up syntax for it in | 58 ;; If this is a Latin-N character set, set up syntax for it in |
59 ;; single-byte mode. We can't use require because the file | 59 ;; single-byte mode. We can't use require because the file |
60 ;; must be eval'd each time. | 60 ;; must be eval'd each time in case we change from one Latin-N to another. |
61 (if (string-match "^Latin-\\([1-9]\\)$" language) | 61 (if (string-match "^Latin-\\([1-9]\\)$" language) |
62 (load (downcase language)))) | 62 (load (downcase language) nil t))) |
63 | 63 |
64 ;; Latin-1 (ISO-8859-1) | 64 ;; Latin-1 (ISO-8859-1) |
65 | 65 |
66 (make-coding-system | 66 (make-coding-system |
67 'iso-latin-1 2 ?1 | 67 'iso-latin-1 2 ?1 |