diff options
author | Kenichi Handa <handa@m17n.org> | 1999-02-12 07:46:42 +0000 |
---|---|---|
committer | Kenichi Handa <handa@m17n.org> | 1999-02-12 07:46:42 +0000 |
commit | 57d71e379167d4c52a7e2844534b134d759f6c08 (patch) | |
tree | 395908edbcb4ec31297ec20aac4a8377632ed815 /lisp/language/vietnamese.el | |
parent | 567cd0f62d8660f8865b11a280cd052d8261664b (diff) | |
download | emacs-57d71e379167d4c52a7e2844534b134d759f6c08.tar.gz |
(vietnamese-viqr): Add charset-origin-alist property.
("Vietnamese"): Remove charset-origin-alist property.
Diffstat (limited to 'lisp/language/vietnamese.el')
-rw-r--r-- | lisp/language/vietnamese.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/language/vietnamese.el b/lisp/language/vietnamese.el index ca38e0a131d..4c785872b6a 100644 --- a/lisp/language/vietnamese.el +++ b/lisp/language/vietnamese.el @@ -225,7 +225,11 @@ Both tables are indexed by the position code of Vietnamese characters.") nil '((safe-charsets ascii vietnamese-viscii-lower vietnamese-viscii-upper) (post-read-conversion . viqr-post-read-conversion) - (pre-write-conversion . viqr-pre-write-conversion))) + (pre-write-conversion . viqr-pre-write-conversion) + (charset-origin-alist + (vietnamese-viscii-lower "VISCII" viet-encode-viscii-char) + (vietnamese-viscii-upper "VISCII" viet-encode-viscii-char)))) + (define-coding-system-alias 'viqr 'vietnamese-viqr) @@ -243,9 +247,6 @@ Both tables are indexed by the position code of Vietnamese characters.") "Vietnamese" `((charset vietnamese-viscii-lower vietnamese-viscii-upper) (nonascii-translation . ,viet-viscii-nonascii-translation-table) - (charset-origin-alist - (vietnamese-viscii-lower "VISCII" viet-encode-viscii-char) - (vietnamese-viscii-upper "VISCII" viet-encode-viscii-char)) (coding-system vietnamese-viscii vietnamese-vscii vietnamese-viqr) (coding-priority vietnamese-viscii) |