diff options
| author | Richard M. Stallman <rms@gnu.org> | 1993-02-21 06:29:09 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1993-02-21 06:29:09 +0000 |
| commit | b34429f8eaa7dbaf0798b8dd2b9d6d1c4d0d0e3d (patch) | |
| tree | b34b4e8affae9ea14fb93bb8b612ed7e95ae5e21 /lisp/emulation | |
| parent | 17431c602d85948a0d19891f948e59de36103212 (diff) | |
| download | emacs-b34429f8eaa7dbaf0798b8dd2b9d6d1c4d0d0e3d.tar.gz | |
(esc-map, ctl-x-map): Define as functions.
Diffstat (limited to 'lisp/emulation')
| -rw-r--r-- | lisp/emulation/mlsupport.el | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/lisp/emulation/mlsupport.el b/lisp/emulation/mlsupport.el index 04c5f18396f..c5091b70434 100644 --- a/lisp/emulation/mlsupport.el +++ b/lisp/emulation/mlsupport.el @@ -51,6 +51,10 @@ (defun define-keymap (name) (fset (intern name) (make-keymap))) +;; Make it work to use ml-use-...-map on "esc" and such. +(fset 'esc-map esc-map) +(fset 'ctl-x-map ctl-x-map) + (defun ml-use-local-map (name) (use-local-map (intern (concat name "-map")))) |