Add narf/kill-all-buffers-do-not-remember to defuns-buffer.el
This commit is contained in:
parent
973467fb7f
commit
c51ca7d7f4
1 changed files with 11 additions and 0 deletions
|
@ -199,5 +199,16 @@ left, create a scratch buffer."
|
||||||
(interactive "<f>")
|
(interactive "<f>")
|
||||||
(cd (if (zerop (length dir)) "~" dir)))
|
(cd (if (zerop (length dir)) "~" dir)))
|
||||||
|
|
||||||
|
;;;###autoload
|
||||||
|
(defun narf/kill-all-buffers-do-not-remember ()
|
||||||
|
(interactive)
|
||||||
|
(let ((confirm-kill-emacs nil))
|
||||||
|
(mapc 'kill-buffer (buffer-list))
|
||||||
|
(kill-this-buffer)
|
||||||
|
(delete-other-windows)
|
||||||
|
(wg-save-session t)
|
||||||
|
(save-buffers-kill-terminal)))
|
||||||
|
|
||||||
|
|
||||||
(provide 'defuns-buffers)
|
(provide 'defuns-buffers)
|
||||||
;;; defuns-buffers.el ends here
|
;;; defuns-buffers.el ends here
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue