X-Git-Url: https://git.hcoop.net/bpt/emacs.git/blobdiff_plain/dacbc44ca3fc825c9e5ffa799f1a0937c1da0020..026b174672c427b035009911de305992a94098d6:/lisp/ebuff-menu.el diff --git a/lisp/ebuff-menu.el b/lisp/ebuff-menu.el index 10d8e02506..6debd9f423 100644 --- a/lisp/ebuff-menu.el +++ b/lisp/ebuff-menu.el @@ -1,10 +1,10 @@ ;;; 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 -;; Maintainer: FSF +;; Maintainer: emacs-devel@gnu.org ;; Keywords: convenience ;; This file is part of GNU Emacs. @@ -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)))