changeset 22207:51847ba069f8

(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 ebcc36b6b95e
children 5b05d45bfbbf
files lisp/menu-bar.el
diffstat 1 files changed, 4 insertions(+), 0 deletions(-) [+]
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)"