Mercurial > emacs

changeset 4941:74c118ef608c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(menu-bar-edit-menu): Add menu items for searching.
author Richard M. Stallman <rms@gnu.org>
date Tue, 09 Nov 1993 07:28:56 +0000
parents 2f65b0f9c6fc
children 0ea29f510ba0
files lisp/menu-bar.el
diffstat 1 files changed, 8 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/menu-bar.el	Tue Nov 09 07:13:00 1993 +0000
+++ b/lisp/menu-bar.el	Tue Nov 09 07:28:56 1993 +0000
@@ -53,10 +53,17 @@
 (define-key menu-bar-file-menu [open-file] '("Open File..." . find-file))
 (define-key menu-bar-file-menu [new-frame] '("New Frame" . new-frame))
 
-
 (define-key menu-bar-edit-menu [spell] '("Spell..." . ispell-menu-map))
 (define-key menu-bar-edit-menu [fill] '("Fill" . fill-region))
 (define-key menu-bar-edit-menu [clear] '("Clear" . delete-region))
+(define-key menu-bar-edit-menu [re-search-back]
+  '("Regexp Search Backwards" . re-search-backward))
+(define-key menu-bar-edit-menu [search-back]
+  '("Search Backwards" . search-backward))
+(define-key menu-bar-edit-menu [re-search-fwd]
+  '("Regexp Search" . re-search-forward))
+(define-key menu-bar-edit-menu [search-fwd]
+  '("Search" . search-forward))
 (define-key menu-bar-edit-menu [choose-next-paste]
   '("Choose Next Paste" . mouse-menu-choose-yank))
 (define-key menu-bar-edit-menu [paste] '("Paste" . yank))