# HG changeset patch # User Simon Josefsson # Date 1025472579 0 # Node ID 3a5c7022ed2fe9f6c56691780c8efc364dfdfa76 # Parent 07cf11153de5e3a383cb1dacdf25c273b9e48bb0 2002-06-30 Simon Josefsson * menu-bar.el (menu-bar-options-menu): Move elisp mode names from menu entry into balloon help. diff -r 07cf11153de5 -r 3a5c7022ed2f lisp/ChangeLog --- a/lisp/ChangeLog Sun Jun 30 14:42:19 2002 +0000 +++ b/lisp/ChangeLog Sun Jun 30 21:29:39 2002 +0000 @@ -1,3 +1,8 @@ +2002-06-30 Simon Josefsson + + * menu-bar.el (menu-bar-options-menu): Move elisp mode names from + menu entry into balloon help. + 2002-06-30 Andreas Schwab * files.el (directory-free-space-args): Don't use `-P' on Darwin. diff -r 07cf11153de5 -r 3a5c7022ed2f lisp/menu-bar.el --- a/lisp/menu-bar.el Sun Jun 30 14:42:19 2002 +0000 +++ b/lisp/menu-bar.el Sun Jun 30 21:29:39 2002 +0000 @@ -864,7 +864,7 @@ "Case-Insensitive Search %s" "Ignore letter-case in search")) (define-key menu-bar-options-menu [auto-fill-mode] - '(menu-item "Word Wrap in Text Modes (Auto Fill)" + '(menu-item "Word Wrap in Text Modes" (lambda () (interactive) (toggle-text-mode-auto-fill) @@ -872,7 +872,7 @@ ;; might have changed outside customize. ;; -- Per Abrahamsen 2002-02-11. (customize-mark-as-set 'text-mode-hook)) - :help "Automatically fill text between left and right margins" + :help "Automatically fill text between left and right margins (Auto Fill)" :button (:toggle . (if (listp text-mode-hook) (member 'turn-on-auto-fill text-mode-hook) (eq 'turn-on-auto-fill text-mode-hook))))) @@ -891,20 +891,20 @@ '("--")) (define-key menu-bar-options-menu [highlight-paren-mode] (menu-bar-make-toggle toggle-highlight-paren-mode show-paren-mode - "Paren Match Highlighting (Show Paren mode)" + "Paren Match Highlighting" "Show Paren mode %s" - "Highlight matching/mismatched parentheses at cursor")) + "Highlight matching/mismatched parentheses at cursor (Show Paren mode)")) (define-key menu-bar-options-menu [transient-mark-mode] (menu-bar-make-toggle toggle-transient-mark-mode transient-mark-mode - "Active Region Highlighting (Transient Mark mode)" + "Active Region Highlighting" "Transient Mark mode %s" - "Make text in active region stand out in color" + "Make text in active region stand out in color (Transient Mark mode)" (:enable (not cua-mode)))) (define-key menu-bar-options-menu [toggle-global-lazy-font-lock-mode] (menu-bar-make-toggle toggle-global-lazy-font-lock-mode global-font-lock-mode - "Syntax Highlighting (Global Font Lock mode)" + "Syntax Highlighting" "Global Font Lock mode %s" - "Colorize text based on language syntax")) + "Colorize text based on language syntax (Global Font Lock mode)")) ;; The "Tools" menu items