summaryrefslogtreecommitdiff
path: root/lisp/language/vietnamese.el
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>1999-02-12 07:46:42 +0000
committerKenichi Handa <handa@m17n.org>1999-02-12 07:46:42 +0000
commit57d71e379167d4c52a7e2844534b134d759f6c08 (patch)
tree395908edbcb4ec31297ec20aac4a8377632ed815 /lisp/language/vietnamese.el
parent567cd0f62d8660f8865b11a280cd052d8261664b (diff)
downloademacs-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.el9
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)