Function: gnus-kill-file-exit
gnus-kill-file-exit is an interactive and byte-compiled function
defined in gnus-kill.el.gz.
Signature
(gnus-kill-file-exit)
Documentation
Save a kill file, then return to the previous buffer.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/gnus/gnus-kill.el.gz
(defun gnus-kill-file-exit ()
"Save a kill file, then return to the previous buffer."
(interactive)
(save-buffer)
(let ((killbuf (current-buffer)))
;; We don't want to return to article buffer.
(when (get-buffer gnus-article-buffer)
(bury-buffer gnus-article-buffer))
;; Delete the KILL file windows.
(delete-windows-on killbuf)
;; Restore last window configuration if available.
(when gnus-winconf-kill-file
(set-window-configuration gnus-winconf-kill-file))
(setq gnus-winconf-kill-file nil)
;; Kill the KILL file buffer. Suggested by tale@pawl.rpi.edu.
(kill-buffer killbuf)))