Mercurial > emacs
changeset 48548:b928795a85d8
(cp-make-coding-system): Deal with
unencodable characters.
| author | Dave Love <fx@gnu.org> |
|---|---|
| date | Tue, 26 Nov 2002 18:17:16 +0000 |
| parents | 930e1c30b4ea |
| children | 7f8d127179e5 |
| files | lisp/international/code-pages.el |
| diffstat | 1 files changed, 3 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/code-pages.el Tue Nov 26 18:16:58 2002 +0000 +++ b/lisp/international/code-pages.el Tue Nov 26 18:17:16 2002 +0000 @@ -185,6 +185,9 @@ ((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)))