Mercurial > emacs
changeset 25840:6beb132dd31c
(custom-bury-buffer): New function.
(custom-buffer-done-function): Use it.
| author | Dave Love <fx@gnu.org> |
|---|---|
| date | Thu, 30 Sep 1999 16:53:27 +0000 |
| parents | 539960b7d9ac |
| children | 2b742626505a |
| files | lisp/cus-edit.el |
| diffstat | 1 files changed, 4 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/cus-edit.el Thu Sep 30 14:13:07 1999 +0000 +++ b/lisp/cus-edit.el Thu Sep 30 16:53:27 1999 +0000 @@ -1153,10 +1153,13 @@ (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"