# HG changeset patch
# User Nick Roberts <nickrob@snap.net.nz>
# Date 1161806753 0
# Node ID 334001e04b9b4ee53a20bf167bef6aa5d8cc9d18
# Parent  7af87808e71c1ec3e69c932a2c0556307acab2b9
(mode-line-mode-menu): Remove bindings for global
minor modes (line/column number) as they are on the menubar.

diff -r 7af87808e71c -r 334001e04b9b lisp/bindings.el
--- a/lisp/bindings.el	Wed Oct 25 20:04:23 2006 +0000
+++ b/lisp/bindings.el	Wed Oct 25 20:05:53 2006 +0000
@@ -426,6 +426,8 @@
   "Return the value of symbol VAR if it is bound, else nil."
   `(and (boundp (quote ,var)) ,var))
 
+;; Use mode-line-mode-menu for local minor-modes only.
+;; Global ones can go on the menubar (Options --> Show/Hide).
 (define-key mode-line-mode-menu [overwrite-mode]
   `(menu-item ,(purecopy "Overwrite (Ovwrt)") overwrite-mode
 	      :button (:toggle . overwrite-mode)))
@@ -460,14 +462,6 @@
 (define-key mode-line-mode-menu [abbrev-mode]
   `(menu-item ,(purecopy "Abbrev (Abbrev)") abbrev-mode
 	      :button (:toggle . abbrev-mode)))
-(define-key mode-line-mode-menu [globals-locals-separator]
-  '(menu-item "--"))
-(define-key mode-line-mode-menu [column-number-mode]
-  `(menu-item ,(purecopy "Column number") column-number-mode
-	      :button (:toggle . column-number-mode)))
-(define-key mode-line-mode-menu [line-number-mode]
-  `(menu-item ,(purecopy "Line number") line-number-mode
-	      :button (:toggle . line-number-mode)))
 
 (defun mode-line-mode-menu (event)
   (interactive "@e")