Commit b2c99afe authored by Glenn Morris's avatar Glenn Morris
Browse files

Remove some charset code not needed since Emacs 22.

parent 29c2869d
2008-11-13 Glenn Morris <rgm@gnu.org>
* nxml/nxml-enc.el: Remove some charset code not needed since Emacs 22.
2008-11-13 Henry Weller <hweller0@gmail.com> (tiny change)
 
* net/mairix.el (mairix-widget-fields-list): Fix bug regarding searching
......
......@@ -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
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment