/[emacs]/emacs/lisp/language/cyrillic.el
ViewVC logotype

Diff of /emacs/lisp/language/cyrillic.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.29 by pj, Sun Jul 15 19:53:53 2001 UTC revision 1.30 by wl, Tue Dec 18 17:50:12 2001 UTC
# Line 36  Line 36 
36    
37  (make-coding-system  (make-coding-system
38   'cyrillic-iso-8bit 2 ?5   'cyrillic-iso-8bit 2 ?5
39   "ISO 2022 based 8-bit encoding for Cyrillic script (MIME:ISO-8859-5)"   "ISO 2022 based 8-bit encoding for Cyrillic script (MIME:ISO-8859-5)."
40   '(ascii cyrillic-iso8859-5  nil nil   '(ascii cyrillic-iso8859-5  nil nil
41     nil nil nil nil nil nil nil)     nil nil nil nil nil nil nil)
42   '((safe-charsets ascii cyrillic-iso8859-5)   '((safe-charsets ascii cyrillic-iso8859-5)
# Line 111  Line 111 
111   ;; but it is also used for Korean.   ;; but it is also used for Korean.
112   ;; So people who use koi8 for languages other than Russian   ;; So people who use koi8 for languages other than Russian
113   ;; will have to forgive us.   ;; will have to forgive us.
114   ?R "KOI8 8-bit encoding for Cyrillic (MIME: KOI8-R)"   ?R
115     "KOI8 8-bit encoding for Cyrillic (MIME: KOI8-R)."
116   '(ccl-decode-koi8 . ccl-encode-koi8)   '(ccl-decode-koi8 . ccl-encode-koi8)
117   `((safe-chars . ,(let ((table (make-char-table 'safe-chars))   `((safe-chars . ,(let ((table (make-char-table 'safe-chars))
118                          (i 0))                          (i 0))
# Line 202  Line 203 
203                            
204  (make-coding-system  (make-coding-system
205   'cyrillic-alternativnyj 4 ?A   'cyrillic-alternativnyj 4 ?A
206   "ALTERNATIVNYJ 8-bit encoding for Cyrillic"   "ALTERNATIVNYJ 8-bit encoding for Cyrillic."
207   '(ccl-decode-alternativnyj . ccl-encode-alternativnyj)   '(ccl-decode-alternativnyj . ccl-encode-alternativnyj)
208   `((safe-chars . ,(let ((table (make-char-table 'safe-chars))   `((safe-chars . ,(let ((table (make-char-table 'safe-chars))
209                          (i 0))                          (i 0))

Legend:
Removed from v.1.29  
changed lines
  Added in v.1.30

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26