Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
branch: master
Fetching contributors…

Cannot retrieve contributors at this time

10 lines (8 sloc) 0.314 kB
(defun bury-scratch ()
"Bury scratch buffer and return nil. Intended to be added to
kill-buffer-query-functions in order to prevent the scratch
buffer being killed."
(if (string= (buffer-name) "*scratch*")
(progn (bury-buffer) nil)
t))
(add-to-list 'kill-buffer-query-functions 'bury-scratch)
Jump to Line
Something went wrong with that request. Please try again.