Mercurial > emacs
comparison lisp/w32-fns.el @ 79980:399b25047283
Partially revert 2007-11-10 change.
author | Jason Rumney <jasonr@gnu.org> |
---|---|
date | Thu, 31 Jan 2008 23:33:56 +0000 |
parents | 73661ddc7ac7 |
children | d4d0381a59d8 |
comparison
equal
deleted
inserted
replaced
79979:643c20b8a0de | 79980:399b25047283 |
---|---|
377 (w32-add-charset-info "iso8859-14" 'w32-charset-ansi 28604) | 377 (w32-add-charset-info "iso8859-14" 'w32-charset-ansi 28604) |
378 (w32-add-charset-info "iso8859-15" 'w32-charset-ansi 28605) | 378 (w32-add-charset-info "iso8859-15" 'w32-charset-ansi 28605) |
379 (w32-add-charset-info "jisx0201-latin" 'w32-charset-shiftjis 932) | 379 (w32-add-charset-info "jisx0201-latin" 'w32-charset-shiftjis 932) |
380 (w32-add-charset-info "jisx0201-katakana" 'w32-charset-shiftjis 932) | 380 (w32-add-charset-info "jisx0201-katakana" 'w32-charset-shiftjis 932) |
381 (w32-add-charset-info "jisx0208-sjis" 'w32-charset-shiftjis 932) | 381 (w32-add-charset-info "jisx0208-sjis" 'w32-charset-shiftjis 932) |
382 (w32-add-charset-info "ksc5601.1989-1" 'w32-charset-hangeul 949) | 382 (w32-add-charset-info "ksc5601.1989" 'w32-charset-hangeul 949) |
383 (w32-add-charset-info "big5-1" 'w32-charset-chinesebig5 950) | 383 (w32-add-charset-info "big5" 'w32-charset-chinesebig5 950) |
384 (w32-add-charset-info "gb2312.1980-1" 'w32-charset-gb2312 936) | 384 (w32-add-charset-info "gb2312.1980" 'w32-charset-gb2312 936) |
385 (w32-add-charset-info "ms-symbol" 'w32-charset-symbol nil) | 385 (w32-add-charset-info "ms-symbol" 'w32-charset-symbol nil) |
386 (w32-add-charset-info "ms-oem" 'w32-charset-oem 437) | 386 (w32-add-charset-info "ms-oem" 'w32-charset-oem 437) |
387 (w32-add-charset-info "ms-oemlatin" 'w32-charset-oem 850) | 387 (w32-add-charset-info "ms-oemlatin" 'w32-charset-oem 850) |
388 (if (boundp 'w32-extra-charsets-defined) | 388 (if (boundp 'w32-extra-charsets-defined) |
389 (progn | 389 (progn |
395 (w32-add-charset-info "iso8859-8" 'w32-charset-hebrew 1255) | 395 (w32-add-charset-info "iso8859-8" 'w32-charset-hebrew 1255) |
396 (w32-add-charset-info "iso8859-9" 'w32-charset-turkish 1254) | 396 (w32-add-charset-info "iso8859-9" 'w32-charset-turkish 1254) |
397 (w32-add-charset-info "iso8859-13" 'w32-charset-baltic 1257) | 397 (w32-add-charset-info "iso8859-13" 'w32-charset-baltic 1257) |
398 (w32-add-charset-info "koi8-r" 'w32-charset-russian 20866) | 398 (w32-add-charset-info "koi8-r" 'w32-charset-russian 20866) |
399 (w32-add-charset-info "iso8859-5" 'w32-charset-russian 28595) | 399 (w32-add-charset-info "iso8859-5" 'w32-charset-russian 28595) |
400 (w32-add-charset-info "tis620-1" 'w32-charset-thai 874) | 400 (w32-add-charset-info "tis620" 'w32-charset-thai 874) |
401 (w32-add-charset-info "ksc5601.1992-1" 'w32-charset-johab 1361) | 401 (w32-add-charset-info "ksc5601.1992" 'w32-charset-johab 1361) |
402 (w32-add-charset-info "mac-latin" 'w32-charset-mac nil))) | 402 (w32-add-charset-info "mac-latin" 'w32-charset-mac nil))) |
403 (if (boundp 'w32-unicode-charset-defined) | 403 (if (boundp 'w32-unicode-charset-defined) |
404 (progn | 404 (progn |
405 (w32-add-charset-info "iso10646-1" 'w32-charset-unicode t)) | 405 (w32-add-charset-info "iso10646-1" 'w32-charset-unicode t)) |
406 ;; If unicode windows charset is not defined, use ansi fonts. | 406 ;; If unicode windows charset is not defined, use ansi fonts. |