Commit 62633a5f authored by Dave Love's avatar Dave Love

(custom-bury-buffer): New function.

(custom-buffer-done-function): Use it.
parent 26901792
......@@ -1153,10 +1153,13 @@ links: groups have links to subgroups."
(const links))
:group 'custom-buffer)
(defun custom-bury-buffer (buffer)
(bury-buffer))
(defcustom custom-buffer-done-function 'bury-buffer
"*Function called to remove a Custom buffer when the user is done with it.
Called with one argument, the buffer to remove."
:type '(choice (function-item bury-buffer)
:type '(choice (function-item custom-bury-buffer)
(function-item kill-buffer)
(function :tag "Other"))
:version "21.1"
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment