]> code.delx.au - gnu-emacs/blobdiff - lisp/ebuff-menu.el
Doc fixes related to zero prefix argument of eval-expression etc
[gnu-emacs] / lisp / ebuff-menu.el
index 10d8e0250672fbe74adc16f15ec37a751bd52900..209476f2374ab3cf5813bf9824ce2438b5eae528 100644 (file)
@@ -1,6 +1,6 @@
 ;;; ebuff-menu.el --- electric-buffer-list mode
 
-;; Copyright (C) 1985-1986, 1994, 2001-2013 Free Software Foundation,
+;; Copyright (C) 1985-1986, 1994, 2001-2014 Free Software Foundation,
 ;; Inc.
 
 ;; Author: Richard Mlynarik <mly@ai.mit.edu>
@@ -227,7 +227,7 @@ Select buffer at point and display buffers marked \">\" in other windows."
 (defun Electric-buffer-menu-mouse-select (event)
   (interactive "e")
   (select-window (posn-window (event-end event)))
-  (set-buffer (window-buffer (selected-window)))
+  (set-buffer (window-buffer))
   (goto-char (posn-point (event-end event)))
   (throw 'electric-buffer-menu-select (point)))