summaryrefslogtreecommitdiff
path: root/lisp/emulation
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/emulation')
-rw-r--r--lisp/emulation/mlsupport.el4
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"))))