[nongnu] elpa/wfnames 14e9d0204d 66/98: New user var to decide what to to with buffer when done

[ELPA Syncer]

branch: elpa/wfnames
commit 14e9d0204d487aafaa42d8b0c732d41c510d12a0
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>

    New user var to decide what to to with buffer when done
---
 wfnames.el | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/wfnames.el b/wfnames.el
index 42028c9122..addc99cfdc 100644
--- a/wfnames.el
+++ b/wfnames.el
@@ -51,6 +51,9 @@
 
 (defvar wfnames-after-commit-hook nil)
 
+(defcustom wfnames-after-commit-function #'kill-buffer
+  "A function to call on `wfnames-buffer' when done."
+  :type 'function)
 
 (defface wfnames-modified '((t :background "LightBlue"))
   "Face used when filename is modified.")
@@ -222,7 +225,7 @@ Special commands:
       (commit)
       (run-hooks 'wfnames-after-commit-hook)
       (message "Renamed %s file(s), Skipped %s file(s)" renamed skipped)
-      (kill-buffer wfnames-buffer))))
+      (funcall wfnames-after-commit-function wfnames-buffer))))
 
 (defun wfnames-revert-changes ()
   (interactive)