From: Kenichi Handa <handa@m17n.org>
Date: Fri, 12 Feb 1999 07:46:42 +0000 (+0000)
Subject: (vietnamese-viqr): Add charset-origin-alist property.
X-Git-Tag: emacs-20.4~653
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=909a166d31f7c76d29e62f763a1323c13a3e5a21;p=emacs.git

(vietnamese-viqr): Add charset-origin-alist property.
("Vietnamese"): Remove charset-origin-alist property.
---

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)