[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/international/mule.el
From: |
Kenichi Handa |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/international/mule.el |
Date: |
Fri, 11 Mar 2005 07:00:48 -0500 |
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))
- [Emacs-diffs] Changes to emacs/lisp/international/mule.el,
Kenichi Handa <=