Mercurial > emacs
changeset 61064:a0bf3de65b02
Add comments before all calls of update-coding-systems-internal.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Tue, 29 Mar 2005 01:26:33 +0000 |
| parents | 4b6f377ee225 |
| children | c40f1d439bcc |
| files | lisp/international/mule-cmds.el |
| diffstat | 1 files changed, 3 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/mule-cmds.el Tue Mar 29 01:15:30 2005 +0000 +++ b/lisp/international/mule-cmds.el Tue Mar 29 01:26:33 2005 +0000 @@ -384,6 +384,7 @@ ;; CODING-SYSTEM is no-conversion or undecided. (error "Can't prefer the coding system `%s'" coding-system)) (set coding-category (or base coding-system)) + ;; Changing the binding of a coding category requires this call. (update-coding-systems-internal) (or (eq coding-category (car coding-category-list)) ;; We must change the order. @@ -1691,6 +1692,7 @@ coding-category-ccl coding-category-binary)) + ;; Changing the binding of a coding category requires this call. (update-coding-systems-internal) (set-default-coding-systems nil) @@ -1904,6 +1906,7 @@ (while priority (set (car categories) (car priority)) (setq priority (cdr priority) categories (cdr categories))) + ;; Changing the binding of a coding category requires this call. (update-coding-systems-internal))))) (defsubst princ-list (&rest args)