# HG changeset patch # User Kenichi Handa # Date 1047961392 0 # Node ID 32435942451c205cc1a8a2c4b1ec752c07d9b341 # Parent b88623fccdf10e338f2ab8abb69162e398f3e84b (no-conversion): Call define-coding-system-internal on this coding system instead of calling register-char-codings. diff -r b88623fccdf1 -r 32435942451c lisp/international/mule-conf.el --- 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)