mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-02-05 07:01:11 -08:00
Code Issues Projects Releases Wiki Activity

(cp-make-coding-system): Deal with

Browse source 
unencodable characters.
This commit is contained in:
Dave Love 2002-11-26 18:17:33 +00:00
parent 149c2e7985
commit 5ba511bddf
2 changed files with 14 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

11
lisp/ChangeLog
View file

@ -1,3 +1,14 @@
2002-11-26 Dave Love <fx@gnu.org>
* language/european.el (encode-mac-roman): Deal with unencodable
characters.
* language/cyrillic.el (ccl-encode-koi8, ccl-encode-koi8-u)
(ccl-encode-alternativnyj): Deal with unencodable characters.
* international/code-pages.el (cp-make-coding-system): Deal with
unencodable characters.
2002-11-24 Richard M. Stallman <rms@gnu.org>
* mail/sendmail.el (mail-signature): Handle case where

3
lisp/international/code-pages.el
View file

@ -185,6 +185,9 @@ corresponding args of `make-coding-system'. If MNEMONIC isn't given,
((loop
(read-multibyte-character r0 r1)
(translate-character ,encoder r0 r1)
(if (r0 != ,(charset-id 'eight-bit-graphic))
(if (r0 != ,(charset-id 'eight-bit-control))
(r1 = ??)))
(write-repeat r1)))))))
`(let ((translation-table (cp-make-translation-table ,v))
(codes (cp-valid-codes ,v)))