]> git.eshelyaron.com Git - emacs.git/commitdiff
(autoload-coding-system): Add SYMBOL to coding-system-alist.
authorKenichi Handa <handa@m17n.org>
Tue, 7 Oct 2003 07:33:22 +0000 (07:33 +0000)
committerKenichi Handa <handa@m17n.org>
Tue, 7 Oct 2003 07:33:22 +0000 (07:33 +0000)
lisp/international/mule.el

index 1ccd26db6c1395151da7d05d57f1354fe72d851e..b86b3bac1fb82df6f16d627a1abbb367f541b17c 100644 (file)
@@ -1123,7 +1123,9 @@ Return the resulting coding system."
   "Define SYMBOL as a coding-system that is defined on demand.
 
 FROM is a form to evaluate to define the coding-system."
-  (put symbol 'coding-system-define-form form))
+  (put symbol 'coding-system-define-form form)
+  (setq coding-system-alist (cons (list (symbol-name symbol))
+                                 coding-system-alist)))
 
 (defun set-buffer-file-coding-system (coding-system &optional force)
   "Set the file coding-system of the current buffer to CODING-SYSTEM.