diff options
author | Stefan Kangas <stefan@marxist.se> | 2021-01-31 15:56:53 +0100 |
---|---|---|
committer | Stefan Kangas <stefan@marxist.se> | 2021-01-31 15:56:53 +0100 |
commit | 4b2203a07ebca62a012e0509ddd62451cb15a914 (patch) | |
tree | 655c9cd7095c922f0a98a21034b09526bff23bda /lisp/international/mule.el | |
parent | 09e99053470ef19d75c4b000d5ebe848288d60dd (diff) | |
download | emacs-4b2203a07ebca62a012e0509ddd62451cb15a914.tar.gz emacs-4b2203a07ebca62a012e0509ddd62451cb15a914.tar.bz2 emacs-4b2203a07ebca62a012e0509ddd62451cb15a914.zip |
Prefer defvar-local in international/*.el
* lisp/international/mule-cmds.el (current-input-method)
(current-input-method-title, current-transient-input-method)
(previous-transient-input-method, input-method-history)
(deactivate-current-input-method-function)
(describe-current-input-method-function):
* lisp/international/mule.el (buffer-file-coding-system-explicit):
* lisp/international/quail.el (quail-current-package)
(quail-guidance-str, quail-overlay, quail-conv-overlay)
(quail-current-key, quail-current-str)
(quail-current-translations, quail-current-data):
* lisp/international/robin.el (robin-mode)
(robin-current-package-name): Prefer defvar-local in
international/*.el.
Diffstat (limited to 'lisp/international/mule.el')
-rw-r--r-- | lisp/international/mule.el | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lisp/international/mule.el b/lisp/international/mule.el index 6a32cffe9a6..52e743e6f3d 100644 --- a/lisp/international/mule.el +++ b/lisp/international/mule.el @@ -1191,12 +1191,11 @@ FORM is a form to evaluate to define the coding-system." ;; `last-coding-system-used'. (It used to set it unconditionally, but ;; that seems unnecessary; see Bug#4533.) -(defvar buffer-file-coding-system-explicit nil +(defvar-local buffer-file-coding-system-explicit nil "The file coding system explicitly specified for the current buffer. The value is a cons of coding systems for reading (decoding) and writing (encoding). Internal use only.") -(make-variable-buffer-local 'buffer-file-coding-system-explicit) (put 'buffer-file-coding-system-explicit 'permanent-local t) (defun read-buffer-file-coding-system () |