/[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.30.2.6 by fx, Fri Jun 14 23:23:08 2002 UTC revision 1.30.2.7 by fx, Sun Aug 18 13:18:54 2002 UTC
# Line 149  Line 149 
149  ;; (set-language-info-alist  ;; (set-language-info-alist
150  ;;  "Windows-1251" `((coding-system windows-1251)  ;;  "Windows-1251" `((coding-system windows-1251)
151  ;;                (coding-priority windows-1251)  ;;                (coding-priority windows-1251)
 ;;                (nonascii-translation  
 ;;                 . ,(get 'decode-windows-1252 'translation-table))  
152  ;;                (input-method . "russian-typewriter") ; fixme?  ;;                (input-method . "russian-typewriter") ; fixme?
153  ;;                (features code-pages)  ;;                (features code-pages)
154  ;;                (documentation . "Support for windows-1251 character set."))  ;;                (documentation . "Support for windows-1251 character set."))
155  ;;  '("Cyrillic"))  ;;  '("Cyrillic"))
156    
157  (set-language-info-alist  (set-language-info-alist
158   "Tajik" `((coding-system cyrillic-koi8-t)   "Tajik" `((coding-system koi8-t)
159             (coding-priority cyrillic-koi8-t)             (coding-priority koi8-t)
160             (nonascii-translation . cyrillic-koi8-t)             (nonascii-translation . cyrillic-koi8-t)
161               (charset . koi8-t)
162             (input-method . "russian-typewriter") ; fixme?             (input-method . "russian-typewriter") ; fixme?
163             (features code-pages)             (features code-pages)
164             (documentation . "Support for Tajik using KOI8-T."))             (documentation . "Support for Tajik using KOI8-T."))
# Line 169  Line 168 
168   "Bulgarian" `((coding-system windows-1251)   "Bulgarian" `((coding-system windows-1251)
169                 (coding-priority windows-1251)                 (coding-priority windows-1251)
170                 (nonascii-translation . windows-1251)                 (nonascii-translation . windows-1251)
171                   (charset . windows-1251)
172                 (input-method . "bulgarian-standard")                 (input-method . "bulgarian-standard")
173                 (features code-pages)                 (features code-pages)
174                 (documentation                 (documentation
# Line 179  Line 179 
179   "Belarusian" `((coding-system windows-1251)   "Belarusian" `((coding-system windows-1251)
180                  (coding-priority windows-1251)                  (coding-priority windows-1251)
181                  (nonascii-translation . windows-1251)                  (nonascii-translation . windows-1251)
182                    (charset . windows-1251)
183                  (input-method . "belarusian")                  (input-method . "belarusian")
184                  (features code-pages)                  (features code-pages)
185                  (documentation                  (documentation
# Line 186  Line 187 
187  \(The name Belarusian replaced Byelorussian in the early 1990s.)"))  \(The name Belarusian replaced Byelorussian in the early 1990s.)"))
188   '("Cyrillic"))   '("Cyrillic"))
189    
190    (set-language-info-alist
191     "Ukrainian" `((coding-system koi8-u)
192                   (coding-priority koi8-u)
193                   (input-method . "ukrainian-computer")
194                   (documentation
195                    . "Support for Ukrainian with koi8-u character set."))
196     '("Cyrillic"))
197    
198  (provide 'cyrillic)  (provide 'cyrillic)
199    
200  ;;; cyrillic.el ends here  ;;; cyrillic.el ends here

Legend:
Removed from v.1.30.2.6  
changed lines
  Added in v.1.30.2.7

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