aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuri Linkov2008-02-28 20:46:30 +0000
committerJuri Linkov2008-02-28 20:46:30 +0000
commit56a8f9c5328eecadda8e456cce07ede68f2c847c (patch)
tree0536138c2022972a9968cef7dde9b6cd7cd5a89a
parent27eb24a3559814aed6d5df8a76efcdf0efb3e108 (diff)
downloademacs-56a8f9c5328eecadda8e456cce07ede68f2c847c.tar.gz
emacs-56a8f9c5328eecadda8e456cce07ede68f2c847c.zip
(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.
-rw-r--r--lisp/ChangeLog24
-rw-r--r--lisp/menu-bar.el18
2 files changed, 39 insertions, 3 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index dba3d58d9a7..5764330bcce 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,27 @@
12008-02-28 Juri Linkov <juri@jurta.org>
2
3 * cus-edit.el (custom-mode-map, custom-mode-link-map):
4 Rename `custom-mode' to `Custom-mode' in docstrings.
5 (custom-buffer-create-internal, customize-browse):
6 Rename `custom-mode' to `Custom-mode'.
7 (custom-mode-hook): Rename to `Custom-mode-hook'.
8 (Custom-mode-hook): Renamed from `custom-mode-hook'.
9 (custom-mode): Rename to `Custom-mode'.
10 (Custom-mode): Renamed from `custom-mode'. Doc fix.
11 (custom-mode): Add backward-compatible non-interactive variant of
12 `Custom-mode' that simply calls `Custom-mode'. Mark it obsoleted.
13 (custom-mode-hook): Mark it as obsolete alias of `Custom-mode-hook'.
14
15 * info-look.el: Rename `custom-mode' to `Custom-mode'.
16
17 * emulation/viper.el (viper-emacs-state-mode-list):
18 Rename `custom-mode' to `Custom-mode'.
19
20 * menu-bar.el (menu-bar-search-menu, menu-bar-replace-menu):
21 Capitalize "Tagged Files".
22 (minibuffer-local-map): Add menu items for next/previous
23 history elements and isearch history forward/backward.
24
12008-02-28 Stefan Monnier <monnier@iro.umontreal.ca> 252008-02-28 Stefan Monnier <monnier@iro.umontreal.ca>
2 26
3 * uniquify.el (uniquify-buffer-base-name): Undo last change. Should be 27 * 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."
309 '(menu-item "Continue Tags Search" tags-loop-continue 309 '(menu-item "Continue Tags Search" tags-loop-continue
310 :help "Continue last tags search operation")) 310 :help "Continue last tags search operation"))
311(define-key menu-bar-search-menu [tags-srch] 311(define-key menu-bar-search-menu [tags-srch]
312 '(menu-item "Search tagged files..." tags-search 312 '(menu-item "Search Tagged Files..." tags-search
313 :help "Search for a regexp in all tagged files")) 313 :help "Search for a regexp in all tagged files"))
314(define-key menu-bar-search-menu [separator-tag-search] 314(define-key menu-bar-search-menu [separator-tag-search]
315 '(menu-item "--")) 315 '(menu-item "--"))
@@ -353,7 +353,7 @@ A large number or nil slows down menu responsiveness."
353 '(menu-item "Continue Replace" tags-loop-continue 353 '(menu-item "Continue Replace" tags-loop-continue
354 :help "Continue last tags replace operation")) 354 :help "Continue last tags replace operation"))
355(define-key menu-bar-replace-menu [tags-repl] 355(define-key menu-bar-replace-menu [tags-repl]
356 '(menu-item "Replace in tagged files..." tags-query-replace 356 '(menu-item "Replace in Tagged Files..." tags-query-replace
357 :help "Interactively replace a regexp in all tagged files")) 357 :help "Interactively replace a regexp in all tagged files"))
358(define-key menu-bar-replace-menu [separator-replace-tags] 358(define-key menu-bar-replace-menu [separator-replace-tags]
359 '(menu-item "--")) 359 '(menu-item "--"))
@@ -1741,7 +1741,19 @@ Buffers menu is regenerated."
1741 :help "Abort input and exit minibuffer")) 1741 :help "Abort input and exit minibuffer"))
1742 (define-key map [menu-bar minibuf return] 1742 (define-key map [menu-bar minibuf return]
1743 (list 'menu-item "Enter" 'exit-minibuffer 1743 (list 'menu-item "Enter" 'exit-minibuffer
1744 :help "Terminate input and exit minibuffer"))) 1744 :help "Terminate input and exit minibuffer"))
1745 (define-key map [menu-bar minibuf isearch-forward]
1746 (list 'menu-item "Isearch History Forward" 'isearch-forward
1747 :help "Incrementally search minibuffer history forward"))
1748 (define-key map [menu-bar minibuf isearch-backward]
1749 (list 'menu-item "Isearch History Backward" 'isearch-backward
1750 :help "Incrementally search minibuffer history backward"))
1751 (define-key map [menu-bar minibuf next]
1752 (list 'menu-item "Next History Item" 'next-history-element
1753 :help "Put next minibuffer history element in the minibuffer"))
1754 (define-key map [menu-bar minibuf previous]
1755 (list 'menu-item "Previous History Item" 'previous-history-element
1756 :help "Put previous minibuffer history element in the minibuffer")))
1745 1757
1746;;;###autoload 1758;;;###autoload
1747;; This comment is taken from tool-bar.el near 1759;; This comment is taken from tool-bar.el near