diff options
| author | Kenichi Handa <handa@m17n.org> | 2005-03-29 01:26:33 +0000 |
|---|---|---|
| committer | Kenichi Handa <handa@m17n.org> | 2005-03-29 01:26:33 +0000 |
| commit | 6a17cee0f7b1864fe9d96ecc4a25ddbd204c57d5 (patch) | |
| tree | a14031bf954804f984b54dffe1fb34e39e072fae /lisp/international/mule-cmds.el | |
| parent | 1f912e994c0abccaba6c7f37e272e781104d5b0d (diff) | |
| download | emacs-6a17cee0f7b1864fe9d96ecc4a25ddbd204c57d5.tar.gz | |
Add comments before all calls of update-coding-systems-internal.
Diffstat (limited to 'lisp/international/mule-cmds.el')
| -rw-r--r-- | lisp/international/mule-cmds.el | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index 5ca08b78453..4957a7cfc7e 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el @@ -384,6 +384,7 @@ See also `coding-category-list' and `coding-system-category'." ;; 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 @@ The default status is as follows: 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 @@ of `buffer-file-coding-system' set by this function." (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) |