diff options
| author | Karl Fogel | 2009-10-09 06:50:14 +0000 |
|---|---|---|
| committer | Karl Fogel | 2009-10-09 06:50:14 +0000 |
| commit | 02d0f051aa7e7ffa3b503122a7b99e47598fbbb2 (patch) | |
| tree | 2d4b0199961e9cb62648b1edce59bfa187948e25 | |
| parent | 33e97a284ffbcfb4b200e4bdb427faf5d48f9a63 (diff) | |
| download | emacs-02d0f051aa7e7ffa3b503122a7b99e47598fbbb2.tar.gz emacs-02d0f051aa7e7ffa3b503122a7b99e47598fbbb2.zip | |
* lisp/bookmark.el (bookmark-bmenu-rename): Don't call bookmark-bmenu-list,
since the list will have been rebuilt anyway. (Bug#4349)
| -rw-r--r-- | lisp/ChangeLog | 7 | ||||
| -rw-r--r-- | lisp/bookmark.el | 1 |
2 files changed, 6 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 4a40500b77a..a6c77c6c03d 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,6 +1,11 @@ | |||
| 1 | 2009-10-09 Karl Fogel <kfogel@red-bean.com> | 1 | 2009-10-09 Karl Fogel <kfogel@red-bean.com> |
| 2 | 2 | ||
| 3 | * lisp/bookmark.el (bookmark-delete): Don't let batch arg prevent | 3 | * bookmark.el (bookmark-bmenu-rename): Don't call bookmark-bmenu-list, |
| 4 | since the list will have been rebuilt anyway. (Bug#4349) | ||
| 5 | |||
| 6 | 2009-10-09 Karl Fogel <kfogel@red-bean.com> | ||
| 7 | |||
| 8 | * bookmark.el (bookmark-delete): Don't let batch arg prevent | ||
| 4 | saving. | 9 | saving. |
| 5 | (bookmark-bmenu-execute-deletions): Don't save here, as | 10 | (bookmark-bmenu-execute-deletions): Don't save here, as |
| 6 | bookmark-delete will now do so if necessary. | 11 | bookmark-delete will now do so if necessary. |
diff --git a/lisp/bookmark.el b/lisp/bookmark.el index 094e3bb8836..ae2b79722d7 100644 --- a/lisp/bookmark.el +++ b/lisp/bookmark.el | |||
| @@ -2027,7 +2027,6 @@ To carry out the deletions that you've marked, use \\<bookmark-bmenu-mode-map>\\ | |||
| 2027 | (let ((bmrk (bookmark-bmenu-bookmark)) | 2027 | (let ((bmrk (bookmark-bmenu-bookmark)) |
| 2028 | (thispoint (point))) | 2028 | (thispoint (point))) |
| 2029 | (bookmark-rename bmrk) | 2029 | (bookmark-rename bmrk) |
| 2030 | (bookmark-bmenu-list) | ||
| 2031 | (goto-char thispoint)))) | 2030 | (goto-char thispoint)))) |
| 2032 | 2031 | ||
| 2033 | 2032 | ||