Mercurial > emacs
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)