diff options
| author | Richard M. Stallman <rms@gnu.org> | 1997-08-19 01:22:06 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1997-08-19 01:22:06 +0000 |
| commit | f6d4c7c07bd381610b9d504e7108e2c4b2291ff0 (patch) | |
| tree | f38d2801603523bdc420697d6fbf3de608f388ec | |
| parent | 4392df04510cde678a7e289f6f9a4aa7f2008698 (diff) | |
| download | emacs-f6d4c7c07bd381610b9d504e7108e2c4b2291ff0.tar.gz | |
(encoded-kbd-iso2022-designations):
(encoded-kbd-iso2022-invocations): Don't make these vars buffer-local.
(encoded-kbd-mode): Don't make encoded-kbd-iso2022-designations
or encoded-kbd-iso2022-invocations buffer-local.
| -rw-r--r-- | lisp/international/encoded-kb.el | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/lisp/international/encoded-kb.el b/lisp/international/encoded-kb.el index 8cc449595c5..d12f2600b16 100644 --- a/lisp/international/encoded-kb.el +++ b/lisp/international/encoded-kb.el @@ -103,7 +103,6 @@ ;; registers (0..3). (defvar encoded-kbd-iso2022-designations nil) -(make-variable-buffer-local 'encoded-kbd-iso2022-designations) (put 'encoded-kbd-iso2022-designations 'permanent-local t) ;; Keep information of invocation state of ISO2022 encoding. This is @@ -112,7 +111,6 @@ ;; register number. (defvar encoded-kbd-iso2022-invocations nil) -(make-variable-buffer-local 'encoded-kbd-iso2022-invocations) (put 'encoded-kbd-iso2022-invocations 'permanent-local t) (defun encoded-kbd-iso2022-designation () @@ -262,7 +260,6 @@ set by the command `set-keyboard-coding-system'." (nth 0 saved-input-mode) (nth 1 saved-input-mode) 'use-8th-bit (nth 3 saved-input-mode)) (setq encoded-kbd-coding 'iso2022-8)) - (make-variable-buffer-local 'encoded-kbd-iso2022-designations) (setq encoded-kbd-iso2022-designations (make-vector 4 nil)) (let ((flags (coding-system-flags coding)) (i 0)) @@ -274,7 +271,6 @@ set by the command `set-keyboard-coding-system'." (aset encoded-kbd-iso2022-designations i (car (aref flags i))))) (setq i (1+ i)))) - (make-variable-buffer-local 'encoded-kbd-iso2022-invocations) (setq encoded-kbd-iso2022-invocations (make-vector 3 nil)) (aset encoded-kbd-iso2022-invocations 0 0) (aset encoded-kbd-iso2022-invocations 1 1)) |