[Emacs-diffs] Changes to emacs/lisp/international/mule.el

[Kenichi Handa]

Index: emacs/lisp/international/mule.el
diff -c emacs/lisp/international/mule.el:1.215 
emacs/lisp/international/mule.el:1.216
*** emacs/lisp/international/mule.el:1.215      Mon Feb 21 12:50:06 2005
--- emacs/lisp/international/mule.el    Fri Mar 11 12:00:47 2005
***************
*** 1041,1046 ****
--- 1041,1047 ----
        (setq coding-category (plist-get plist 'coding-category))
        (aset coding-spec coding-spec-plist-idx plist))
      (put coding-system 'coding-system coding-spec)
+     (put coding-system 'coding-system-define-form nil)
      (put coding-category 'coding-systems
         (cons coding-system (get coding-category 'coding-systems))))
  
***************
*** 1102,1107 ****
--- 1103,1109 ----
  (defun define-coding-system-alias (alias coding-system)
    "Define ALIAS as an alias for coding system CODING-SYSTEM."
    (put alias 'coding-system (coding-system-spec coding-system))
+   (put alias 'coding-system-define-form nil)
    (add-to-coding-system-list alias)
    (setq coding-system-alist (cons (list (symbol-name alias))
                                  coding-system-alist))