Don't define charset `vietnamese-viscii-lower' and
authortomo <tomo>
Thu, 9 Sep 1999 06:54:11 +0000 (06:54 +0000)
committertomo <tomo>
Thu, 9 Sep 1999 06:54:11 +0000 (06:54 +0000)
`vietnamese-viscii-upper' because they are defined as builtin
charsets.

lisp/mule/viet-chars.el

index 0df00f9..7b3c4a4 100644 (file)
 ;; read in before the code that creates those sets is evaluated.
 
 ;; Vietnamese VISCII with two tables.
-(make-charset 'vietnamese-viscii-lower "VISCII lower (Vietnamese)"
-             '(registry "VISCII1.1"
-               dimension 1
-               chars 96
-               final ?1
-               graphic 1
-               ))
-
-(make-charset 'vietnamese-viscii-upper "VISCII upper (Vietnamese)"
-             '(registry "VISCII1.1"
-               dimension 1
-               chars 96
-               final ?2
-               graphic 1
-               ))
+(unless (featurep 'utf-2000)
+  (make-charset 'vietnamese-viscii-lower "VISCII lower (Vietnamese)"
+               '(registry "VISCII1.1"
+                 dimension 1
+                 chars 96
+                 final ?1
+                 graphic 1
+                 ))
+
+  (make-charset 'vietnamese-viscii-upper "VISCII upper (Vietnamese)"
+               '(registry "VISCII1.1"
+                 dimension 1
+                 chars 96
+                 final ?2
+                 graphic 1
+                 ))
+  )
 
 (modify-syntax-entry 'vietnamese-viscii-lower "w")
 (modify-syntax-entry 'vietnamese-viscii-upper "w")