(custom-bury-buffer): New function.
(custom-buffer-done-function): Use it.
This commit is contained in:
parent
2690179258
commit
62633a5f53
1 changed files with 4 additions and 1 deletions
|
@ -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"
|
||||
|
|
Loading…
Add table
Reference in a new issue