summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJuri Linkov <juri@jurta.org>2012-02-23 02:55:30 +0200
committerJuri Linkov <juri@jurta.org>2012-02-23 02:55:30 +0200
commitb617673c98fea9961d648d8215c92baf8098313a (patch)
treea09945e1ea117a92f600e40510d524d31f129004
parent0bd1e07406f0140d699a0d12a655753cf77cdf8a (diff)
downloademacs-b617673c98fea9961d648d8215c92baf8098313a.tar.gz
emacs-b617673c98fea9961d648d8215c92baf8098313a.tar.bz2
emacs-b617673c98fea9961d648d8215c92baf8098313a.zip
* lisp/replace.el (occur-menu-map): Add menu item for `occur-edit-mode'.
-rw-r--r--lisp/ChangeLog2
-rw-r--r--lisp/replace.el3
2 files changed, 5 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d69231fd806..f2ebeee8abe 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -3,6 +3,8 @@
* isearch.el (isearch-occur): Sync interactive spec with occur's
new feature in `occur-read-primary-args'. Doc fix. (Bug#10705)
+ * replace.el (occur-menu-map): Add menu item for `occur-edit-mode'.
+
2012-02-22 Juri Linkov <juri@jurta.org>
* international/mule-cmds.el (read-char-by-name): Use \` and \'.
diff --git a/lisp/replace.el b/lisp/replace.el
index cb6d7d21e77..349e63d4201 100644
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -786,6 +786,9 @@ a previously found match."
(define-key map [occur-rename-buffer]
`(menu-item ,(purecopy "Rename Occur Buffer") occur-rename-buffer
:help ,(purecopy "Rename the current *Occur* buffer to *Occur: original-buffer-name*.")))
+ (define-key map [occur-edit-buffer]
+ `(menu-item ,(purecopy "Edit Occur Buffer") occur-edit-mode
+ :help ,(purecopy "Edit the *Occur* buffer and apply changes to the original buffers.")))
(define-key map [separator-2] menu-bar-separator)
(define-key map [occur-mode-goto-occurrence-other-window]
`(menu-item ,(purecopy "Go To Occurrence Other Window") occur-mode-goto-occurrence-other-window