[Emacs-diffs] /srv/bzr/emacs/trunk r107381: * lisp/replace.el (occur-menu-map): Add menu item for `occur-edit-mode'.

[Juri Linkov]

------------------------------------------------------------
revno: 107381
committer: Juri Linkov <address@hidden>
branch nick: trunk
timestamp: Thu 2012-02-23 02:55:30 +0200
message:
  * lisp/replace.el (occur-menu-map): Add menu item for `occur-edit-mode'.
modified:
  lisp/ChangeLog
  lisp/replace.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2012-02-23 00:36:49 +0000
+++ b/lisp/ChangeLog    2012-02-23 00:55:30 +0000
@@ -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  <address@hidden>
 
        * international/mule-cmds.el (read-char-by-name): Use \` and \'.

=== modified file 'lisp/replace.el'
--- a/lisp/replace.el   2012-01-19 07:21:25 +0000
+++ b/lisp/replace.el   2012-02-23 00:55:30 +0000
@@ -786,6 +786,9 @@
     (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