changeset 21663:a03ddc4a728b

FLAGS arguments for make-coding-system changed.
author Kenichi Handa <handa@m17n.org>
date Mon, 20 Apr 1998 02:14:20 +0000
parents 95299ecbc8b3
children 4097e558fa19
files lisp/language/cyrillic.el lisp/language/vietnamese.el
diffstat 2 files changed, 4 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/language/cyrillic.el	Mon Apr 20 02:14:20 1998 +0000
+++ b/lisp/language/cyrillic.el	Mon Apr 20 02:14:20 1998 +0000
@@ -104,7 +104,7 @@
  ;; So people who use koi8 for languages other than Russian
  ;; will have to forgive us.
  ?R "KOI8 8-bit encoding for Cyrillic (MIME: KOI8-R)"
- (cons ccl-decode-koi8 ccl-encode-koi8)
+ '(ccl-decode-koi8 . ccl-encode-koi8)
  '((safe-charsets ascii cyrillic-iso8859-5)
    (mime-charset . koi8-r)))
 
@@ -184,7 +184,7 @@
 (make-coding-system
  'cyrillic-alternativnyj 4 ?A
  "ALTERNATIVNYJ 8-bit encoding for Cyrillic"
- (cons ccl-decode-alternativnyj ccl-encode-alternativnyj)
+ '(ccl-decode-alternativnyj . ccl-encode-alternativnyj)
  '((safe-charsets ascii cyrillic-iso8859-5)))
 
 (define-coding-system-alias 'alternativnyj 'cyrillic-alternativnyj)
--- a/lisp/language/vietnamese.el	Mon Apr 20 02:14:20 1998 +0000
+++ b/lisp/language/vietnamese.el	Mon Apr 20 02:14:20 1998 +0000
@@ -203,7 +203,7 @@
 (make-coding-system
  'vietnamese-viscii 4 ?V
  "8-bit encoding for Vietnamese VISCII 1.1 (MIME:VISCII)"
- (cons ccl-decode-viscii ccl-encode-viscii)
+ '(ccl-decode-viscii . ccl-encode-viscii)
  '((safe-charsets ascii vietnamese-viscii-lower vietnamese-viscii-upper)
    (mime-charset . viscii)))
 
@@ -212,7 +212,7 @@
 (make-coding-system
  'vietnamese-vscii 4 ?v
  "8-bit encoding for Vietnamese VSCII-1"
- (cons ccl-decode-vscii ccl-encode-vscii)
+ '(ccl-decode-vscii . ccl-encode-vscii)
  '((safe-charsets ascii vietnamese-viscii-lower vietnamese-viscii-upper)))
 
 (define-coding-system-alias 'vscii 'vietnamese-vscii)