From: Richard M. Stallman <rms@gnu.org>
Date: Sun, 24 May 1998 01:00:03 +0000 (+0000)
Subject: (toggle-case-fold-search): New command.
X-Git-Tag: emacs-20.3~870
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3f51f129bc73f0307289e8817a1e8317120be7c0;p=emacs.git

(toggle-case-fold-search): New command.
(menu-bar-options-menu): Put that in the menu.
---

diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index b0015abda8e..eec880a5cbd 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -415,6 +415,10 @@ Do the same for the keys of the same name."
 			(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)"