Mercurial > hg > xemacs-beta
changeset 4600:dcfd965d65a1
Correct invalid-sequence-coding-system spec, Roman-alphabet languages.
I had been testing with the Cyrillic language environments, and I have code
in my own init file that does something similar, so I hadn't noticed that
this had gone wrong.
lisp/ChangeLog addition:
2009-02-04 Aidan Kehoe <kehoea@parhasard.net>
* mule/latin.el:
Specify windows-1250 as the invalid-sequence-coding-system for the
iso-8859-2 languages; actually *use* the
invalid-sequence-coding-system for German and the other iso-8859-1
language environments.
| author | Aidan Kehoe <kehoea@parhasard.net> |
|---|---|
| date | Wed, 04 Feb 2009 13:12:21 +0000 |
| parents | 0347879667ed |
| children | aac2a827bb6b |
| files | lisp/ChangeLog lisp/mule/latin.el |
| diffstat | 2 files changed, 11 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Wed Feb 04 12:41:14 2009 +0000 +++ b/lisp/ChangeLog Wed Feb 04 13:12:21 2009 +0000 @@ -1,3 +1,11 @@ +2009-02-04 Aidan Kehoe <kehoea@parhasard.net> + + * mule/latin.el: + Specify windows-1250 as the invalid-sequence-coding-system for the + iso-8859-2 languages; actually *use* the + invalid-sequence-coding-system for German and the other iso-8859-1 + language environments. + 2009-02-04 Aidan Kehoe <kehoea@parhasard.net> * coding.el (force-coding-system-equivalency):
--- a/lisp/mule/latin.el Wed Feb 04 12:41:14 2009 +0000 +++ b/lisp/mule/latin.el Wed Feb 04 13:12:21 2009 +0000 @@ -1022,7 +1022,7 @@ ((latin-iso8859-2 iso-8859-2 "latin-2-prefix" "Latin-2" "ISO-8859-2" " Albanian, Czech, English, German, Hungarian, Polish, Romanian, Serbian, Croatian, Slovak, Slovene, Sorbian (upper and lower), - and Swedish.") ;; " added because fontification got screwed up, CVS-20061203. + and Swedish." windows-1250) (("Albanian" "sq") ("Croatian" ("hrvatski" "hr") "TUTORIAL.hr") ("Czech" ("cs" "cz") "TUTORIAL.cs" "P,Bx(Bejeme v,Ba(Bm hezk,B}(B den!" @@ -1076,6 +1076,8 @@ (coding-system ,codesys) (coding-priority ,codesys) (native-coding-system ,codesys) + (invalid-sequence-coding-system ,(or invalid-sequence-coding-system + codesys)) ,@(if locale `((locale . ,locale))) ,@(if tutorial `((tutorial . ,tutorial) (tutorial-coding-system . ,codesys)))