From c8f0d090d075bbaf3553a7addcbfaad18e7fcb6d Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Thu, 23 Oct 1997 12:03:41 +0000 Subject: [PATCH] Give proper SAFE-CHARSET argument in each call of make-coding-system. --- lisp/language/vietnamese.el | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/lisp/language/vietnamese.el b/lisp/language/vietnamese.el index 5207b514c63..5181155e52f 100644 --- a/lisp/language/vietnamese.el +++ b/lisp/language/vietnamese.el @@ -203,21 +203,24 @@ Both tables are indexed by the position code of Vietnamese characters.") (make-coding-system 'vietnamese-viscii 4 ?V "8-bit encoding for Vietnamese VISCII 1.1 (MIME:VISCII)" - (cons ccl-decode-viscii ccl-encode-viscii)) + (cons ccl-decode-viscii ccl-encode-viscii) + '(ascii vietnamese-viscii-lower vietnamese-viscii-upper)) (define-coding-system-alias 'viscii 'vietnamese-viscii) (make-coding-system 'vietnamese-vscii 4 ?v "8-bit encoding for Vietnamese VSCII-1" - (cons ccl-decode-vscii ccl-encode-vscii)) + (cons ccl-decode-vscii ccl-encode-vscii) + '(ascii vietnamese-viscii-lower vietnamese-viscii-upper)) (define-coding-system-alias 'vscii 'vietnamese-vscii) (make-coding-system 'vietnamese-viqr 0 ?q "Vietnamese latin transcription (VIQR)" - nil) + nil + '(ascii vietnamese-viscii-lower vietnamese-viscii-upper)) (coding-system-put 'vietnamese-viqr 'post-read-conversion 'viqr-post-read-conversion) (coding-system-put 'vietnamese-viqr 'pre-write-conversion -- 2.39.2