mirror of
https://github.com/masscollaborationlabs/emacs.git
synced 2025-07-05 19:59:38 +00:00
* 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")
|
(define-obsolete-function-alias 'mouse-tear-off-window 'tear-off-window "24.4")
|
||||||
(defun tear-off-window (click)
|
(defun tear-off-window (click)
|
||||||
"Delete the selected window, and create a new frame displaying its buffer."
|
"Delete the selected window, and create a new frame displaying its buffer."
|
||||||
(interactive "e")
|
(interactive (list last-nonmenu-event))
|
||||||
(mouse-minibuffer-check click)
|
(mouse-minibuffer-check click)
|
||||||
(let* ((window (posn-window (event-start click)))
|
(let* ((window (posn-window (event-start click)))
|
||||||
(buf (window-buffer window))
|
(buf (window-buffer window))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue