Mercurial > emacs
comparison lisp/international/ucs-tables.el @ 45387:aee6ae77d23b
(unify-8859-on-encoding-mode) (unify-8859-on-decoding-mode): Change
:version attributes to strings.
author | Markus Rost <rost@math.uni-bielefeld.de> |
---|---|
date | Mon, 20 May 2002 03:08:24 +0000 |
parents | a0eaee1a642d |
children | a7f933a7b003 |
comparison
equal
deleted
inserted
replaced
45386:453e599fd7f8 | 45387:aee6ae77d23b |
---|---|
1277 can cope with separate Latin-1 and Latin-9 representations of e-acute. | 1277 can cope with separate Latin-1 and Latin-9 representations of e-acute. |
1278 | 1278 |
1279 See also command `unify-8859-on-decoding-mode'." | 1279 See also command `unify-8859-on-decoding-mode'." |
1280 :group 'mule | 1280 :group 'mule |
1281 :global t | 1281 :global t |
1282 :version 21.3 ; who knows...? | 1282 :version "21.3" ; who knows...? |
1283 :init-value nil | 1283 :init-value nil |
1284 (if unify-8859-on-encoding-mode | 1284 (if unify-8859-on-encoding-mode |
1285 (ucs-unify-8859 t) | 1285 (ucs-unify-8859 t) |
1286 (ucs-fragment-8859 t))) | 1286 (ucs-fragment-8859 t))) |
1287 | 1287 |
1296 methods produce unified characters. | 1296 methods produce unified characters. |
1297 | 1297 |
1298 See also command `unify-8859-on-encoding-mode'." | 1298 See also command `unify-8859-on-encoding-mode'." |
1299 :group 'mule | 1299 :group 'mule |
1300 :global t | 1300 :global t |
1301 :version 21.3 ; who knows...? | 1301 :version "21.3" ; who knows...? |
1302 :init-value nil | 1302 :init-value nil |
1303 (let ((table (if unify-8859-on-decoding-mode ucs-mule-8859-to-mule-unicode))) | 1303 (let ((table (if unify-8859-on-decoding-mode ucs-mule-8859-to-mule-unicode))) |
1304 (set-char-table-parent standard-translation-table-for-decode table) | 1304 (set-char-table-parent standard-translation-table-for-decode table) |
1305 (setq-default translation-table-for-input table))) | 1305 (setq-default translation-table-for-input table))) |
1306 | 1306 |