Mercurial > emacs

diff lisp/menu-bar.el @ 22207:51847ba069f8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(toggle-case-fold-search): New command. (menu-bar-options-menu): Put that in the menu.
author Richard M. Stallman <rms@gnu.org>
date Sun, 24 May 1998 01:00:03 +0000
parents f485fe3e433e
children 175d00eed6c7
line wrap: on
line diff
--- a/lisp/menu-bar.el	Sun May 24 00:55:39 1998 +0000
+++ b/lisp/menu-bar.el	Sun May 24 01:00:03 1998 +0000
@@ -415,6 +415,10 @@
 			(setq uniquify-buffer-name-style
 			      (if (not uniquify-buffer-name-style)
 				  'forward))))
+(define-key menu-bar-options-menu [case-fold-search]
+  (menu-bar-make-toggle toggle-case-fold-search case-fold-search
+			"Case folding in searches"
+			"Case folding in searches %s"))
 (define-key menu-bar-options-menu [transient-mark-mode]
   (menu-bar-make-toggle toggle-transient-mark-mode transient-mark-mode
 			"Transient Mark Mode (highlights region)"