summaryrefslogtreecommitdiff
path: root/lisp/mouse.el
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2018-09-22 19:16:55 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2018-09-22 19:16:55 -0400
commita3639317bc9ba2bf2a92396970beb0ce9c3f446d (patch)
treea6b583ab12e032995fef246ca5bc69fe4c0ea457 /lisp/mouse.el
parent8b8a4c0aeb21692970fe919e96ad4b832fe1078b (diff)
downloademacs-a3639317bc9ba2bf2a92396970beb0ce9c3f446d.tar.gz
* lisp/mouse.el (tear-off-window): Fix non-mouse use (bug#32799)
Diffstat (limited to 'lisp/mouse.el')
-rw-r--r--lisp/mouse.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mouse.el b/lisp/mouse.el
index f749d12054b..d14b5cbea4d 100644
--- a/lisp/mouse.el
+++ b/lisp/mouse.el
@@ -326,7 +326,7 @@ This command must be bound to a mouse click."
(define-obsolete-function-alias 'mouse-tear-off-window 'tear-off-window "24.4")
(defun tear-off-window (click)
"Delete the selected window, and create a new frame displaying its buffer."
- (interactive "e")
+ (interactive (list last-nonmenu-event))
(mouse-minibuffer-check click)
(let* ((window (posn-window (event-start click)))
(buf (window-buffer window))