Mercurial > hg > xemacs-beta
comparison lisp/specifier.el @ 4489:b75b075a9041
Support displaying invalid UTF-8 in language-environment-specific ways.
2008-08-05 Aidan Kehoe <kehoea@parhasard.net>
* specifier.el (current-display-table): Initialise this here, not
in x-init.el, since we want it even on non-X builds to use the
support for displaying Unicode error sequences according to the
current locale.
* mule/mule-cmds.el (set-language-info):
Document error-sequence-coding-system, used to describe how to
display characters that are not valid Unicode on disk.
* mule/mule-cmds.el (finish-set-language-environment):
Implement error-sequence-coding-system.
* unicode.el (unicode-error-sequence-warning-face):
New face, to make it possible to distinguish invalid Unicode
sequences from the characters given by the valid Unicode
sequences.
* mule/cyrillic.el ("Russian"):
("Ukrainian"):
("Bulgarian"):
("Belarusian"):
("Cyrillic-ALT"): Add support for error-sequence-coding-system for
all these languages.
* mule/latin.el:
Add support for error-sequence-coding-system for the
Latin-alphabet language environments.
| author | Aidan Kehoe <kehoea@parhasard.net> |
|---|---|
| date | Tue, 05 Aug 2008 09:06:41 +0200 |
| parents | 4f2243a0dc04 |
| children | 18c0b5909d16 |
comparison
equal
deleted
inserted
replaced
| 4488:6b0000935adc | 4489:b75b075a9041 |
|---|---|
| 986 (let ((inst | 986 (let ((inst |
| 987 (instance-to-instantiator | 987 (instance-to-instantiator |
| 988 (specifier-instance specifier domain)))) | 988 (specifier-instance specifier domain)))) |
| 989 (list (cons nil inst)))))))))) | 989 (list (cons nil inst)))))))))) |
| 990 | 990 |
| 991 ;; Character 160 (octal 0240) displays incorrectly under some X | |
| 992 ;; installations apparently due to a universally crocked font width | |
| 993 ;; specification. Display it as a space since that's what's expected. | |
| 994 ;; | |
| 995 ;; (make-char-table 'generic) instead of (make-display-table) because | |
| 996 ;; make-display-table isn't dumped, and this file is. | |
| 997 ;; | |
| 998 ;; We also want the global display table to be actually globally | |
| 999 ;; initialised; that's why this is here, and not in x-init.el, these days. | |
| 1000 | |
| 1001 (set-specifier current-display-table | |
| 1002 #s(char-table type generic data (?\xA0 ?\x20)) | |
| 1003 'global) | |
| 1004 | |
| 991 ;;; specifier.el ends here | 1005 ;;; specifier.el ends here |