Possibly kill buffer on C-w if not visible elsewhere
This commit is contained in:
parent
bd52011f80
commit
bceebeca1e
1 changed files with 1 additions and 0 deletions
|
@ -172,6 +172,7 @@
|
||||||
;;;###autoload
|
;;;###autoload
|
||||||
(defun narf/close-window-or-workgroup ()
|
(defun narf/close-window-or-workgroup ()
|
||||||
(interactive)
|
(interactive)
|
||||||
|
(narf/kill-real-buffer)
|
||||||
(if (and (= (length (window-list)) 1)
|
(if (and (= (length (window-list)) 1)
|
||||||
(> (length (wg-workgroup-list)) 1))
|
(> (length (wg-workgroup-list)) 1))
|
||||||
(if (string= (wg-workgroup-name (wg-current-workgroup)) wg-first-wg-name)
|
(if (string= (wg-workgroup-name (wg-current-workgroup)) wg-first-wg-name)
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue