(no-conversion): Call

define-coding-system-internal on this coding system instead of
calling register-char-codings.

diff --git a/lisp/international/mule-conf.el b/lisp/international/mule-conf.el
index 7372da02f8059ff7efe5c9e87036c0b633a47a9f..45efa97872c0d7febc7ab5ab4dc1b8f3dc3d9da6 100644 (file)
--- a/lisp/international/mule-conf.el
+++ b/lisp/international/mule-conf.el
@@ -306,13 +306,14 @@ When you visit a file with this coding, the file is read into a
 unibyte buffer as is, thus each byte of a file is treated as a
 character."
             (list 'coding-category 'coding-category-binary
-                  'alias-coding-systems '(no-conversion))
+                  'alias-coding-systems '(no-conversion)
+                  'safe-charsets t 'safe-chars t)
             nil))
 (put 'no-conversion 'eol-type 0)
 (put 'coding-category-binary 'coding-systems '(no-conversion))
 (setq coding-system-list '(no-conversion))
 (setq coding-system-alist '(("no-conversion")))
-(register-char-codings 'no-conversion t)
+(define-coding-system-internal 'no-conversion)
 
 (define-coding-system-alias 'binary 'no-conversion)