diff options
author | Glenn Morris <rgm@gnu.org> | 2008-11-13 05:03:33 +0000 |
---|---|---|
committer | Glenn Morris <rgm@gnu.org> | 2008-11-13 05:03:33 +0000 |
commit | b2c99afe4d6f855176b0e709169ea20c0f8bac55 (patch) | |
tree | 8a218e506b819e4f0f490ff95c99e751f109b3bb /lisp/nxml | |
parent | 29c2869d40ffa43c4082120aa189aa3580a19138 (diff) | |
download | emacs-b2c99afe4d6f855176b0e709169ea20c0f8bac55.tar.gz |
Remove some charset code not needed since Emacs 22.
Diffstat (limited to 'lisp/nxml')
-rw-r--r-- | lisp/nxml/nxml-enc.el | 23 |
1 files changed, 1 insertions, 22 deletions
diff --git a/lisp/nxml/nxml-enc.el b/lisp/nxml/nxml-enc.el index 26d028becf4..5890f1c0e57 100644 --- a/lisp/nxml/nxml-enc.el +++ b/lisp/nxml/nxml-enc.el @@ -139,32 +139,11 @@ Applied to any files that `auto-mode-alist' says should be handled by (setq set-auto-coding-function nxml-non-xml-set-auto-coding-function) (setq nxml-non-xml-set-auto-coding-function nil)))) -(unless (coding-system-p 'us-ascii) - (make-coding-system - ;; Unicode Emacs uses ?- last time I looked - 'us-ascii 2 ?- - "ISO 2022 based 7-bit encoding for ASCII (MIME:US-ASCII)" - '(ascii) - '((safe-charsets ascii) - (mime-charset . us-ascii)))) - -;; Emacs 21.3.50 makes us-ascii an alias for iso-safe without +;; Emacs 22 makes us-ascii an alias for iso-safe without ;; giving it a mime-charset property. (unless (coding-system-get 'us-ascii 'mime-charset) (coding-system-put 'us-ascii 'mime-charset 'us-ascii)) -;; Work around bug in Emacs 21.3 - -(when (and (coding-system-p 'utf-16-le) - (eq (coding-system-get 'utf-16-le 'pre-write-conversion) - 'utf-16-le-pre-write-conversion)) - (coding-system-put 'utf-16-le 'pre-write-conversion nil)) - -(when (and (coding-system-p 'utf-16-le) - (eq (coding-system-get 'utf-16-be 'pre-write-conversion) - 'utf-16-be-pre-write-conversion)) - (coding-system-put 'utf-16-be 'pre-write-conversion nil)) - (provide 'nxml-enc) ;; arch-tag: c2436247-78f3-418c-8069-85dc5335d083 |