[Emacs-diffs] Changes to emacs/lisp/menu-bar.el,v

[Chong Yidong]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Chong Yidong <cyd>      08/06/06 21:28:20

Index: menu-bar.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/menu-bar.el,v
retrieving revision 1.333
retrieving revision 1.334
diff -u -b -r1.333 -r1.334
--- menu-bar.el 17 May 2008 14:33:48 -0000      1.333
+++ menu-bar.el 6 Jun 2008 21:28:20 -0000       1.334
@@ -1016,7 +1016,7 @@
   (menu-bar-make-toggle toggle-case-fold-search case-fold-search
            "Case-Insensitive Search"
            "Case-Insensitive Search %s"
-           "Globally ignore letter-case in search"))
+           "Ignore letter-case in search commands"))
 
 (defun menu-bar-text-mode-auto-fill ()
   (interactive)
@@ -1027,16 +1027,24 @@
   (customize-mark-as-set 'text-mode-hook))
 
 (define-key menu-bar-options-menu [auto-fill-mode]
-  '(menu-item "Word Wrap in Text Modes"
+  '(menu-item "Auto Fill in Text Modes"
               menu-bar-text-mode-auto-fill
-             :help "Automatically fill text between left and right margins 
(Auto Fill)"
+             :help "Automatically fill text while typing (Auto Fill Mode)"
               :button (:toggle . (if (listp text-mode-hook)
                                     (member 'turn-on-auto-fill text-mode-hook)
                                   (eq 'turn-on-auto-fill text-mode-hook)))))
+
+(define-key menu-bar-options-menu [longlines-mode]
+  '(menu-item "Word Wrap for Long Lines in this Buffer"
+              longlines-mode
+             :help "Perform word wrapping for long lines (Long Lines mode)"
+              :button (:toggle . (and (boundp 'longlines-mode)
+                                     longlines-mode))))
+
 (define-key menu-bar-options-menu [truncate-lines]
   '(menu-item "Truncate Long Lines in this Buffer"
              toggle-truncate-lines
-             :help "Truncate long lines on the screen"
+             :help "Truncate long lines at the window edge "
              :button (:toggle . (if (or (window-full-width-p)
                                         (not truncate-partial-width-windows))
                                     truncate-lines