comparison lisp/mule/latin.el @ 4447:15dd5229cea5

Support windows-1250 on Unix as well as Windows. 2008-05-07 Aidan Kehoe <kehoea@parhasard.net> * mule/latin.el (windows-1250): Add the Central European Windows coding system. * mule/mule-win32-init.el: Don't use the Windows-specific CP1250 implementation, rely on that in latin.el instead.
author Aidan Kehoe <kehoea@parhasard.net>
date Wed, 07 May 2008 21:06:45 +0200
parents 948c9b232595
children b75b075a9041
comparison
equal deleted inserted replaced
4446:c32b3d10c56b 4447:15dd5229cea5
186 "ISO-8859-2 (Latin-2) for Central Europe. 186 "ISO-8859-2 (Latin-2) for Central Europe.
187 See also `windows-1250', and `iso-8859-1', which is compatible with Latin 2 187 See also `windows-1250', and `iso-8859-1', which is compatible with Latin 2
188 when used to write German (or English, of course). " 188 when used to write German (or English, of course). "
189 '(mnemonic "Latin 2" 189 '(mnemonic "Latin 2"
190 aliases (iso-latin-2 latin-2))) 190 aliases (iso-latin-2 latin-2)))
191
192 (make-8-bit-coding-system
193 'windows-1250
194 '((#x80 ?\u20AC) ;; EURO SIGN
195 (#x82 ?\u201A) ;; SINGLE LOW-9 QUOTATION MARK
196 (#x84 ?\u201E) ;; DOUBLE LOW-9 QUOTATION MARK
197 (#x85 ?\u2026) ;; HORIZONTAL ELLIPSIS
198 (#x86 ?\u2020) ;; DAGGER
199 (#x87 ?\u2021) ;; DOUBLE DAGGER
200 (#x89 ?\u2030) ;; PER MILLE SIGN
201 (#x8A ?\u0160) ;; LATIN CAPITAL LETTER S WITH CARON
202 (#x8B ?\u2039) ;; SINGLE LEFT-POINTING ANGLE QUOTATION MARK
203 (#x8C ?\u015A) ;; LATIN CAPITAL LETTER S WITH ACUTE
204 (#x8D ?\u0164) ;; LATIN CAPITAL LETTER T WITH CARON
205 (#x8E ?\u017D) ;; LATIN CAPITAL LETTER Z WITH CARON
206 (#x8F ?\u0179) ;; LATIN CAPITAL LETTER Z WITH ACUTE
207 (#x91 ?\u2018) ;; LEFT SINGLE QUOTATION MARK
208 (#x92 ?\u2019) ;; RIGHT SINGLE QUOTATION MARK
209 (#x93 ?\u201C) ;; LEFT DOUBLE QUOTATION MARK
210 (#x94 ?\u201D) ;; RIGHT DOUBLE QUOTATION MARK
211 (#x95 ?\u2022) ;; BULLET
212 (#x96 ?\u2013) ;; EN DASH
213 (#x97 ?\u2014) ;; EM DASH
214 (#x99 ?\u2122) ;; TRADE MARK SIGN
215 (#x9A ?\u0161) ;; LATIN SMALL LETTER S WITH CARON
216 (#x9B ?\u203A) ;; SINGLE RIGHT-POINTING ANGLE QUOTATION MARK
217 (#x9C ?\u015B) ;; LATIN SMALL LETTER S WITH ACUTE
218 (#x9D ?\u0165) ;; LATIN SMALL LETTER T WITH CARON
219 (#x9E ?\u017E) ;; LATIN SMALL LETTER Z WITH CARON
220 (#x9F ?\u017A) ;; LATIN SMALL LETTER Z WITH ACUTE
221 (#xA0 ?\u00A0) ;; NO-BREAK SPACE
222 (#xA1 ?\u02C7) ;; CARON
223 (#xA2 ?\u02D8) ;; BREVE
224 (#xA3 ?\u0141) ;; LATIN CAPITAL LETTER L WITH STROKE
225 (#xA4 ?\u00A4) ;; CURRENCY SIGN
226 (#xA5 ?\u0104) ;; LATIN CAPITAL LETTER A WITH OGONEK
227 (#xA6 ?\u00A6) ;; BROKEN BAR
228 (#xA7 ?\u00A7) ;; SECTION SIGN
229 (#xA8 ?\u00A8) ;; DIAERESIS
230 (#xA9 ?\u00A9) ;; COPYRIGHT SIGN
231 (#xAA ?\u015E) ;; LATIN CAPITAL LETTER S WITH CEDILLA
232 (#xAB ?\u00AB) ;; LEFT-POINTING DOUBLE ANGLE QUOTATION MARK
233 (#xAC ?\u00AC) ;; NOT SIGN
234 (#xAD ?\u00AD) ;; SOFT HYPHEN
235 (#xAE ?\u00AE) ;; REGISTERED SIGN
236 (#xAF ?\u017B) ;; LATIN CAPITAL LETTER Z WITH DOT ABOVE
237 (#xB0 ?\u00B0) ;; DEGREE SIGN
238 (#xB1 ?\u00B1) ;; PLUS-MINUS SIGN
239 (#xB2 ?\u02DB) ;; OGONEK
240 (#xB3 ?\u0142) ;; LATIN SMALL LETTER L WITH STROKE
241 (#xB4 ?\u00B4) ;; ACUTE ACCENT
242 (#xB5 ?\u00B5) ;; MICRO SIGN
243 (#xB6 ?\u00B6) ;; PILCROW SIGN
244 (#xB7 ?\u00B7) ;; MIDDLE DOT
245 (#xB8 ?\u00B8) ;; CEDILLA
246 (#xB9 ?\u0105) ;; LATIN SMALL LETTER A WITH OGONEK
247 (#xBA ?\u015F) ;; LATIN SMALL LETTER S WITH CEDILLA
248 (#xBB ?\u00BB) ;; RIGHT-POINTING DOUBLE ANGLE QUOTATION MARK
249 (#xBC ?\u013D) ;; LATIN CAPITAL LETTER L WITH CARON
250 (#xBD ?\u02DD) ;; DOUBLE ACUTE ACCENT
251 (#xBE ?\u013E) ;; LATIN SMALL LETTER L WITH CARON
252 (#xBF ?\u017C) ;; LATIN SMALL LETTER Z WITH DOT ABOVE
253 (#xC0 ?\u0154) ;; LATIN CAPITAL LETTER R WITH ACUTE
254 (#xC1 ?\u00C1) ;; LATIN CAPITAL LETTER A WITH ACUTE
255 (#xC2 ?\u00C2) ;; LATIN CAPITAL LETTER A WITH CIRCUMFLEX
256 (#xC3 ?\u0102) ;; LATIN CAPITAL LETTER A WITH BREVE
257 (#xC4 ?\u00C4) ;; LATIN CAPITAL LETTER A WITH DIAERESIS
258 (#xC5 ?\u0139) ;; LATIN CAPITAL LETTER L WITH ACUTE
259 (#xC6 ?\u0106) ;; LATIN CAPITAL LETTER C WITH ACUTE
260 (#xC7 ?\u00C7) ;; LATIN CAPITAL LETTER C WITH CEDILLA
261 (#xC8 ?\u010C) ;; LATIN CAPITAL LETTER C WITH CARON
262 (#xC9 ?\u00C9) ;; LATIN CAPITAL LETTER E WITH ACUTE
263 (#xCA ?\u0118) ;; LATIN CAPITAL LETTER E WITH OGONEK
264 (#xCB ?\u00CB) ;; LATIN CAPITAL LETTER E WITH DIAERESIS
265 (#xCC ?\u011A) ;; LATIN CAPITAL LETTER E WITH CARON
266 (#xCD ?\u00CD) ;; LATIN CAPITAL LETTER I WITH ACUTE
267 (#xCE ?\u00CE) ;; LATIN CAPITAL LETTER I WITH CIRCUMFLEX
268 (#xCF ?\u010E) ;; LATIN CAPITAL LETTER D WITH CARON
269 (#xD0 ?\u0110) ;; LATIN CAPITAL LETTER D WITH STROKE
270 (#xD1 ?\u0143) ;; LATIN CAPITAL LETTER N WITH ACUTE
271 (#xD2 ?\u0147) ;; LATIN CAPITAL LETTER N WITH CARON
272 (#xD3 ?\u00D3) ;; LATIN CAPITAL LETTER O WITH ACUTE
273 (#xD4 ?\u00D4) ;; LATIN CAPITAL LETTER O WITH CIRCUMFLEX
274 (#xD5 ?\u0150) ;; LATIN CAPITAL LETTER O WITH DOUBLE ACUTE
275 (#xD6 ?\u00D6) ;; LATIN CAPITAL LETTER O WITH DIAERESIS
276 (#xD7 ?\u00D7) ;; MULTIPLICATION SIGN
277 (#xD8 ?\u0158) ;; LATIN CAPITAL LETTER R WITH CARON
278 (#xD9 ?\u016E) ;; LATIN CAPITAL LETTER U WITH RING ABOVE
279 (#xDA ?\u00DA) ;; LATIN CAPITAL LETTER U WITH ACUTE
280 (#xDB ?\u0170) ;; LATIN CAPITAL LETTER U WITH DOUBLE ACUTE
281 (#xDC ?\u00DC) ;; LATIN CAPITAL LETTER U WITH DIAERESIS
282 (#xDD ?\u00DD) ;; LATIN CAPITAL LETTER Y WITH ACUTE
283 (#xDE ?\u0162) ;; LATIN CAPITAL LETTER T WITH CEDILLA
284 (#xDF ?\u00DF) ;; LATIN SMALL LETTER SHARP S
285 (#xE0 ?\u0155) ;; LATIN SMALL LETTER R WITH ACUTE
286 (#xE1 ?\u00E1) ;; LATIN SMALL LETTER A WITH ACUTE
287 (#xE2 ?\u00E2) ;; LATIN SMALL LETTER A WITH CIRCUMFLEX
288 (#xE3 ?\u0103) ;; LATIN SMALL LETTER A WITH BREVE
289 (#xE4 ?\u00E4) ;; LATIN SMALL LETTER A WITH DIAERESIS
290 (#xE5 ?\u013A) ;; LATIN SMALL LETTER L WITH ACUTE
291 (#xE6 ?\u0107) ;; LATIN SMALL LETTER C WITH ACUTE
292 (#xE7 ?\u00E7) ;; LATIN SMALL LETTER C WITH CEDILLA
293 (#xE8 ?\u010D) ;; LATIN SMALL LETTER C WITH CARON
294 (#xE9 ?\u00E9) ;; LATIN SMALL LETTER E WITH ACUTE
295 (#xEA ?\u0119) ;; LATIN SMALL LETTER E WITH OGONEK
296 (#xEB ?\u00EB) ;; LATIN SMALL LETTER E WITH DIAERESIS
297 (#xEC ?\u011B) ;; LATIN SMALL LETTER E WITH CARON
298 (#xED ?\u00ED) ;; LATIN SMALL LETTER I WITH ACUTE
299 (#xEE ?\u00EE) ;; LATIN SMALL LETTER I WITH CIRCUMFLEX
300 (#xEF ?\u010F) ;; LATIN SMALL LETTER D WITH CARON
301 (#xF0 ?\u0111) ;; LATIN SMALL LETTER D WITH STROKE
302 (#xF1 ?\u0144) ;; LATIN SMALL LETTER N WITH ACUTE
303 (#xF2 ?\u0148) ;; LATIN SMALL LETTER N WITH CARON
304 (#xF3 ?\u00F3) ;; LATIN SMALL LETTER O WITH ACUTE
305 (#xF4 ?\u00F4) ;; LATIN SMALL LETTER O WITH CIRCUMFLEX
306 (#xF5 ?\u0151) ;; LATIN SMALL LETTER O WITH DOUBLE ACUTE
307 (#xF6 ?\u00F6) ;; LATIN SMALL LETTER O WITH DIAERESIS
308 (#xF7 ?\u00F7) ;; DIVISION SIGN
309 (#xF8 ?\u0159) ;; LATIN SMALL LETTER R WITH CARON
310 (#xF9 ?\u016F) ;; LATIN SMALL LETTER U WITH RING ABOVE
311 (#xFA ?\u00FA) ;; LATIN SMALL LETTER U WITH ACUTE
312 (#xFB ?\u0171) ;; LATIN SMALL LETTER U WITH DOUBLE ACUTE
313 (#xFC ?\u00FC) ;; LATIN SMALL LETTER U WITH DIAERESIS
314 (#xFD ?\u00FD) ;; LATIN SMALL LETTER Y WITH ACUTE
315 (#xFE ?\u0163) ;; LATIN SMALL LETTER T WITH CEDILLA
316 (#xFF ?\u02D9)) ;; DOT ABOVE
317 "CP 1250, Microsoft's encoding for Central Europe.
318 See also `iso-8859-2' and `window-1252' for Western Europe. "
319 '(mnemonic "CP1250"
320 aliases (cp1250)))
321
191 322
192 ;; 323 ;;
193 ;; Latin-3 (ISO-8859-3). Esperanto, Maltese and Turkish. Obsolescent. 324 ;; Latin-3 (ISO-8859-3). Esperanto, Maltese and Turkish. Obsolescent.
194 325
195 ;; Initialise the non-word syntax codes in ISO-8859-3, copying them from 326 ;; Initialise the non-word syntax codes in ISO-8859-3, copying them from