diff options
| author | Kenichi Handa <handa@m17n.org> | 2003-10-07 07:33:22 +0000 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 2003-10-07 07:33:22 +0000 |
| commit | 28849ffc720d8c1d8bd5c18d62d17cff58d006f8 (patch) | |
| tree | 9834aef799da6ff593db171eb320df8d02dd6aa0 /lisp/international | |
| parent | f82ac129c78e13b9615b3c92bf59b51ae149c517 (diff) | |
| download | emacs-28849ffc720d8c1d8bd5c18d62d17cff58d006f8.tar.gz | |
(autoload-coding-system): Add SYMBOL to coding-system-alist.
Diffstat (limited to 'lisp/international')
| -rw-r--r-- | lisp/international/mule.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/international/mule.el b/lisp/international/mule.el index 1ccd26db6c1..b86b3bac1fb 100644 --- a/lisp/international/mule.el +++ b/lisp/international/mule.el @@ -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. |