Mercurial > hg > xemacs-beta

comparison lisp/mule/cyrillic.el @ 4957:db2db229ee82

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
merge
author Ben Wing <ben@xemacs.org>
date Thu, 28 Jan 2010 02:48:45 -0600
parents 8b230c53075b 29fb3baea939
children e813cf16c015
comparison
equal deleted inserted replaced
4956:3461165c79be 4957:db2db229ee82
1164 (?\u04EE ?\u04EF)) ;; U WITH MACRON 1164 (?\u04EE ?\u04EF)) ;; U WITH MACRON
1165 with case-table = (standard-case-table) 1165 with case-table = (standard-case-table)
1166 do 1166 do
1167 (put-case-table-pair upper lower case-table)) 1167 (put-case-table-pair upper lower case-table))
1168 1168
1169 ;; Support fot the languages of the Caucasus. 1169 ;; Support for the languages of the Caucasus. Never widely used.
1170 (make-coding-system 1170 (make-coding-system
1171 'koi8-c 'fixed-width "KOI-8, Caucasus." 1171 'koi8-c 'fixed-width "KOI-8, Caucasus."
1172 '(unicode-map 1172 '(unicode-map
1173 ((#x80 ?\u0493) ;; CYRILLIC SMALL LETTER GHE WITH STROKE 1173 ((#x80 ?\u0493) ;; CYRILLIC SMALL LETTER GHE WITH STROKE
1174 (#x81 ?\u0497) ;; CYRILLIC SMALL LETTER ZHE WITH DESCENDER 1174 (#x81 ?\u0497) ;; CYRILLIC SMALL LETTER ZHE WITH DESCENDER
1309 (?\u0452 ?\u0402) ;; DJE 1309 (?\u0452 ?\u0402) ;; DJE
1310 (?\u0455 ?\u0405) ;; DZE 1310 (?\u0455 ?\u0405) ;; DZE
1311 (?\u04A3 ?\u04A2) ;; EN WITH DESCENDER 1311 (?\u04A3 ?\u04A2) ;; EN WITH DESCENDER
1312 (?\u049D ?\u049C) ;; KA WITH VERTICAL STROKE 1312 (?\u049D ?\u049C) ;; KA WITH VERTICAL STROKE
1313 (?\u04BB ?\u04BA) ;; SHHA 1313 (?\u04BB ?\u04BA) ;; SHHA
1314 (?\u04D9 ?\u04D8) ;; SCHWA
1314 (?\u04AF ?\u04AE) ;; STRAIGHT U 1315 (?\u04AF ?\u04AE) ;; STRAIGHT U
1315 (?\u04B1 ?\u04B0) ;; STRAIGHT U WITH STROKE 1316 (?\u04B1 ?\u04B0) ;; STRAIGHT U WITH STROKE
1316 (?\u0497 ?\u0496)) ;; ZHE WITH DESCENDER 1317 (?\u0497 ?\u0496)) ;; ZHE WITH DESCENDER
1317 with case-table = (standard-case-table) 1318 with case-table = (standard-case-table)
1318 do 1319 do