diff lisp/language/indian.el @ 88414:fad0f879877f

Call define-coding-system instead of make-coding-system. All CCL program deleted.
author Kenichi Handa <handa@m17n.org>
date Fri, 01 Mar 2002 02:28:29 +0000
parents c7ffa58f9637
children dfa89e1b4c56
line wrap: on
line diff
--- a/lisp/language/indian.el	Fri Mar 01 02:22:38 2002 +0000
+++ b/lisp/language/indian.el	Fri Mar 01 02:28:29 2002 +0000
@@ -29,14 +29,16 @@
 
 ;;; Code:
 
-(make-coding-system
- 'in-is13194 2 ?D
- "8-bit encoding for ASCII (MSB=0) and IS13194-Devanagari (MSB=1)."
- '(ascii indian-is13194 nil nil
-   nil ascii-eol)
- '((safe-charsets ascii indian-is13194)
-   (post-read-conversion . in-is13194-post-read-conversion)
-   (pre-write-conversion . in-is13194-pre-write-conversion)))
+(define-coding-system 'in-is13194-devanagari
+  "8-bit encoding for ASCII (MSB=0) and IS13194-Devanagari (MSB=1)."
+  :coding-type 'iso-2022
+  :mnemonic ?D
+  :designation [ascii indian-is13194 nil nil]
+  :charset-list '(ascii indian-is13194)
+  :post-read-conversion 'in-is13194-devanagari-post-read-conversion
+  :pre-write-conversion 'in-is13194-devanagari-pre-write-conversion)
+
+(define-coding-system-alias 'devanagari 'in-is13194-devanagari)
 
 (defvar indian-script-table
   '[