summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lisp/ChangeLog6
-rw-r--r--lisp/bindings.el2
2 files changed, 7 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 584688ee19a..ff377e2e85a 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,11 @@
1999-12-30 Gerd Moellmann <gerd@gnu.org>
+ * bindings.el (make-mode-line-mouse-sensitive): Copy keymap
+ assigned to mode-line-mode-menu because bindings.el is dumped with
+ Emacs, and thus the lists used for menu-item definition will be
+ copied to pure space. Emacs' menu code (parse_menu_item) doesn't
+ like pure menu item definitions.
+
* expand.el (expand-abbrev-hook): Return t if expansion was
done, nil otherwise.
diff --git a/lisp/bindings.el b/lisp/bindings.el
index 2f71f624ccb..ccc4e905caa 100644
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -237,7 +237,7 @@ Menu of mode operations in the mode line.")
(define-key map [overwrite-mode]
'(menu-item "Overwrite" overwrite-mode
:active t :style toggle :selected overwrite-mode))
- (setq mode-line-mode-menu map)
+ (setq mode-line-mode-menu (copy-keymap map))
(defun mode-line-mode-menu (event)
(interactive "@e")
(x-popup-menu event mode-line-mode-menu)))