From 6b48d742c0c018c084c8c946a461323397185f22 Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Thu, 9 Aug 2001 14:57:30 +0000 Subject: [PATCH] (mouse-delete-window): Do nothing if frame has just one window. --- lisp/ChangeLog | 3 +++ lisp/mouse.el | 5 ++--- 2 files changed, 5 insertions(+), 3 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 69c3c186a85..30da4f37008 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,5 +1,8 @@ 2001-08-09 Gerd Moellmann + * mouse.el (mouse-delete-window): Do nothing if frame has just + one window. + * bindings.el (minor-mode-alist): Use mode-line-minor-mode-keymap for the minor mode name. diff --git a/lisp/mouse.el b/lisp/mouse.el index 66d0a924b85..410ad59b02d 100644 --- a/lisp/mouse.el +++ b/lisp/mouse.el @@ -233,11 +233,10 @@ Use the former if the menu bar is showing, otherwise the latter." (defun mouse-delete-window (click) "Delete the window you click on. -If the frame has just one window, bury the current buffer instead. +Do nothing if the frame has just one window. This command must be bound to a mouse click." (interactive "e") - (if (one-window-p t) - (bury-buffer) + (unless (one-window-p t) (mouse-minibuffer-check click) (delete-window (posn-window (event-start click))))) -- 2.39.2