diff options
| author | Karl Heuer <kwzh@gnu.org> | 1998-12-02 18:14:27 +0000 |
|---|---|---|
| committer | Karl Heuer <kwzh@gnu.org> | 1998-12-02 18:14:27 +0000 |
| commit | 79f8634741bf456fcd2297fe23721942b05062cf (patch) | |
| tree | 37b1bdab3575f3e7d990d217edca3d22be0784f4 /lisp/international/iso-transl.el | |
| parent | 2cbebefb27d60d9a5f395c55036a796ac9b92e45 (diff) | |
| download | emacs-79f8634741bf456fcd2297fe23721942b05062cf.tar.gz | |
Fix previous change.
Diffstat (limited to 'lisp/international/iso-transl.el')
| -rw-r--r-- | lisp/international/iso-transl.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/international/iso-transl.el b/lisp/international/iso-transl.el index 706aac88bc2..7b2deedef70 100644 --- a/lisp/international/iso-transl.el +++ b/lisp/international/iso-transl.el @@ -35,7 +35,7 @@ ;;; Provide some binding for startup: ;;;###autoload (or key-translation-map (setq key-translation-map (make-sparse-keymap))) -;;;###autoload (define-key key-translation-map "\C-x8" iso-transl-ctl-x-8-map) +;;;###autoload (define-key key-translation-map "\C-x8" 'iso-transl-ctl-x-8-map) ;;;###autoload (autoload 'iso-transl-ctl-x-8-map "iso-transl" "Keymap for C-x 8 prefix." t 'keymap) (defvar iso-transl-dead-key-alist @@ -213,7 +213,8 @@ sequence VECTOR. (VECTOR is normally one character long.)") (defvar iso-transl-ctl-x-8-map nil "Keymap for C-x 8 prefix.") (or iso-transl-ctl-x-8-map - (setq iso-transl-ctl-x-8-map (make-sparse-keymap))) + (fset 'iso-transl-ctl-x-8-map + (setq iso-transl-ctl-x-8-map (make-sparse-keymap)))) (or key-translation-map (setq key-translation-map (make-sparse-keymap))) (define-key key-translation-map "\C-x8" iso-transl-ctl-x-8-map) |