`vietnamese-viscii-upper' because they are defined as builtin
charsets.
;; 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")