* lisp/mouse.el (tear-off-window): Fix non-mouse use (bug#32799)
This commit is contained in:
parent
8b8a4c0aeb
commit
a3639317bc
1 changed files with 1 additions and 1 deletions
|
@ -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))
|
||||
|
|
Loading…
Add table
Reference in a new issue