From: Juri Linkov <juri@jurta.org>
Date: Thu, 28 Feb 2008 20:46:30 +0000 (+0000)
Subject: (menu-bar-search-menu, menu-bar-replace-menu): Capitalize "Tagged Files".
X-Git-Tag: emacs-pretest-23.0.90~7588
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=56a8f9c5328eecadda8e456cce07ede68f2c847c;p=emacs.git

(menu-bar-search-menu, menu-bar-replace-menu): Capitalize "Tagged Files".
(minibuffer-local-map): Add menu items for next/previous
history elements and isearch history forward/backward.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index dba3d58d9a7..5764330bcce 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,27 @@
+2008-02-28  Juri Linkov  <juri@jurta.org>
+
+	* cus-edit.el (custom-mode-map, custom-mode-link-map):
+	Rename `custom-mode' to `Custom-mode' in docstrings.
+	(custom-buffer-create-internal, customize-browse):
+	Rename `custom-mode' to `Custom-mode'.
+	(custom-mode-hook): Rename to `Custom-mode-hook'.
+	(Custom-mode-hook): Renamed from `custom-mode-hook'.
+	(custom-mode): Rename to `Custom-mode'.
+	(Custom-mode): Renamed from `custom-mode'.  Doc fix.
+	(custom-mode): Add backward-compatible non-interactive variant of
+	`Custom-mode' that simply calls `Custom-mode'.  Mark it obsoleted.
+	(custom-mode-hook): Mark it as obsolete alias of `Custom-mode-hook'.
+
+	* info-look.el: Rename `custom-mode' to `Custom-mode'.
+
+	* emulation/viper.el (viper-emacs-state-mode-list):
+	Rename `custom-mode' to `Custom-mode'.
+
+	* menu-bar.el (menu-bar-search-menu, menu-bar-replace-menu):
+	Capitalize "Tagged Files".
+	(minibuffer-local-map): Add menu items for next/previous
+	history elements and isearch history forward/backward.
+
 2008-02-28  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	* uniquify.el (uniquify-buffer-base-name): Undo last change.  Should be
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index 9d6303314cd..2ad77ce4e46 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -309,7 +309,7 @@ A large number or nil slows down menu responsiveness."
   '(menu-item "Continue Tags Search" tags-loop-continue
 	      :help "Continue last tags search operation"))
 (define-key menu-bar-search-menu [tags-srch]
-  '(menu-item "Search tagged files..." tags-search
+  '(menu-item "Search Tagged Files..." tags-search
 	      :help "Search for a regexp in all tagged files"))
 (define-key menu-bar-search-menu [separator-tag-search]
   '(menu-item "--"))
@@ -353,7 +353,7 @@ A large number or nil slows down menu responsiveness."
   '(menu-item "Continue Replace" tags-loop-continue
 	      :help "Continue last tags replace operation"))
 (define-key menu-bar-replace-menu [tags-repl]
-  '(menu-item "Replace in tagged files..." tags-query-replace
+  '(menu-item "Replace in Tagged Files..." tags-query-replace
 	      :help "Interactively replace a regexp in all tagged files"))
 (define-key menu-bar-replace-menu [separator-replace-tags]
   '(menu-item "--"))
@@ -1741,7 +1741,19 @@ Buffers menu is regenerated."
 	  :help "Abort input and exit minibuffer"))
   (define-key map [menu-bar minibuf return]
     (list 'menu-item "Enter" 'exit-minibuffer
-	  :help "Terminate input and exit minibuffer")))
+	  :help "Terminate input and exit minibuffer"))
+  (define-key map [menu-bar minibuf isearch-forward]
+    (list 'menu-item "Isearch History Forward" 'isearch-forward
+	  :help "Incrementally search minibuffer history forward"))
+  (define-key map [menu-bar minibuf isearch-backward]
+    (list 'menu-item "Isearch History Backward" 'isearch-backward
+	  :help "Incrementally search minibuffer history backward"))
+  (define-key map [menu-bar minibuf next]
+    (list 'menu-item "Next History Item" 'next-history-element
+	  :help "Put next minibuffer history element in the minibuffer"))
+  (define-key map [menu-bar minibuf previous]
+    (list 'menu-item "Previous History Item" 'previous-history-element
+	  :help "Put previous minibuffer history element in the minibuffer")))
 
 ;;;###autoload
 ;; This comment is taken from tool-bar.el near