changeset 50182:32435942451c

(no-conversion): Call define-coding-system-internal on this coding system instead of calling register-char-codings.
author Kenichi Handa <handa@m17n.org>
date Tue, 18 Mar 2003 04:23:12 +0000
parents b88623fccdf1
children 42387e68072a
files lisp/international/mule-conf.el
diffstat 1 files changed, 3 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/mule-conf.el	Tue Mar 18 04:11:32 2003 +0000
+++ b/lisp/international/mule-conf.el	Tue Mar 18 04:23:12 2003 +0000
@@ -306,13 +306,14 @@
 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)