Mercurial > emacs

changeset 109281:81cfe104e929

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Remove unnecessary let-bindings in bookmark.el (Bug#6515) * bookmark.el (bookmark-bmenu-2-window) (bookmark-bmenu-other-window) (bookmark-bmenu-other-window-with-mouse): Remove unnecessary bindings of bookmark-automatically-show-annotations (Bug#6515).
author Chong Yidong <cyd@stupidchicken.com>
date Sun, 27 Jun 2010 14:03:26 -0400
parents cc75fd2ab734
children 3c15269db196
files lisp/ChangeLog lisp/bookmark.el
diffstat 2 files changed, 10 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Sat Jun 26 14:01:38 2010 -0700
+++ b/lisp/ChangeLog	Sun Jun 27 14:03:26 2010 -0400
@@ -1,3 +1,10 @@
+2010-06-27  Christoph  <cschol2112@googlemail.com>  (tiny change)
+
+	* bookmark.el (bookmark-bmenu-2-window)
+	(bookmark-bmenu-other-window)
+	(bookmark-bmenu-other-window-with-mouse): Remove unnecessary
+	bindings of bookmark-automatically-show-annotations (Bug#6515).
+
 2010-06-25  Eli Zaretskii  <eliz@gnu.org>
 
 	* arc-mode.el (archive-zip-extract): Don't quote the file name on
--- a/lisp/bookmark.el	Sat Jun 26 14:01:38 2010 -0700
+++ b/lisp/bookmark.el	Sun Jun 27 14:03:26 2010 -0400
@@ -1854,8 +1854,7 @@
         (pop-up-windows t))
     (delete-other-windows)
     (switch-to-buffer (other-buffer))
-    (let ((bookmark-automatically-show-annotations nil)) ;FIXME: needed?
-      (bookmark--jump-via bmrk 'pop-to-buffer))
+    (bookmark--jump-via bmrk 'pop-to-buffer)
     (bury-buffer menu)))
 
 
@@ -1869,8 +1868,7 @@
   "Select this line's bookmark in other window, leaving bookmark menu visible."
   (interactive)
   (let ((bookmark (bookmark-bmenu-bookmark)))
-    (let ((bookmark-automatically-show-annotations t)) ;FIXME: needed?
-      (bookmark--jump-via bookmark 'switch-to-buffer-other-window))))
+    (bookmark--jump-via bookmark 'switch-to-buffer-other-window)))
 
 
 (defun bookmark-bmenu-switch-other-window ()
@@ -1881,8 +1879,7 @@
         (pop-up-windows t)
         same-window-buffer-names
         same-window-regexps)
-    (let ((bookmark-automatically-show-annotations t)) ;FIXME: needed?
-      (bookmark--jump-via bookmark 'display-buffer))))
+    (bookmark--jump-via bookmark 'display-buffer)))
 
 (defun bookmark-bmenu-other-window-with-mouse (event)
   "Select bookmark at the mouse pointer in other window, leaving bookmark menu visible."