# HG changeset patch # User Kenichi Handa # Date 918805602 0 # Node ID 28d942c5d967fad8b170d0f8e4c5d30ae8ffeb11 # Parent 0845212b2b2c39c7b66374d17069c3bf71a89559 (vietnamese-viqr): Add charset-origin-alist property. ("Vietnamese"): Remove charset-origin-alist property. diff -r 0845212b2b2c -r 28d942c5d967 lisp/language/vietnamese.el --- a/lisp/language/vietnamese.el Thu Feb 11 22:47:03 1999 +0000 +++ b/lisp/language/vietnamese.el Fri Feb 12 07:46:42 1999 +0000 @@ -225,7 +225,11 @@ 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 @@ "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)