Mercurial > emacs
comparison lisp/language/european.el @ 19394:619697797214
(setup-latin1-environment): Don't set special-microsoft-code-table here.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sat, 16 Aug 1997 21:57:47 +0000 |
| parents | 1a7bd3dd824e |
| children | b931375072b2 |
comparison
equal
deleted
inserted
replaced
| 19393:ef747a07f03d | 19394:619697797214 |
|---|---|
| 74 | 74 |
| 75 (defun setup-latin1-environment () | 75 (defun setup-latin1-environment () |
| 76 "Set up multilingual environment (MULE) for European Latin-1 users." | 76 "Set up multilingual environment (MULE) for European Latin-1 users." |
| 77 (interactive) | 77 (interactive) |
| 78 (setup-8-bit-environment "Latin-1" 'latin-iso8859-1 'iso-latin-1 | 78 (setup-8-bit-environment "Latin-1" 'latin-iso8859-1 'iso-latin-1 |
| 79 "latin-1-prefix") | 79 "latin-1-prefix")) |
| 80 (aset special-microsoft-code-table ?\222 t)) | |
| 81 | 80 |
| 82 (set-language-info-alist | 81 (set-language-info-alist |
| 83 "Latin-1" '((setup-function . (setup-latin1-environment | 82 "Latin-1" '((setup-function . (setup-latin1-environment |
| 84 . setup-european-environment-map)) | 83 . setup-european-environment-map)) |
| 85 (charset . (ascii latin-iso8859-1)) | 84 (charset . (ascii latin-iso8859-1)) |