branch: elpa/git-commit
commit 9699c70e1e40d042391cf9ef93ca405ad6929228
Author: Jonas Bernoulli <jo...@bernoul.li>
Commit: Jonas Bernoulli <jo...@bernoul.li>
magit-confirm-files: Add prompt-suffix and noabort arguments
---
lisp/magit-base.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/lisp/magit-base.el b/lisp/magit-base.el
index c039c36177..546bd4ef63 100644
--- a/lisp/magit-base.el
+++ b/lisp/magit-base.el
@@ -807,14 +807,14 @@ ACTION is a member of option `magit-slow-confirm'."
items)))
(if noabort nil (user-error "Abort"))))
-(defun magit-confirm-files (action files &optional prompt)
+(defun magit-confirm-files (action files &optional prompt prompt-suffix
noabort)
(when files
(unless prompt
(setq prompt (magit-confirm-make-prompt action)))
(magit-confirm action
(concat prompt " %s")
(concat prompt " %d files")
- nil files)))
+ noabort files prompt-suffix)))
(defun magit-confirm-make-prompt (action)
(let ((prompt (symbol-name action)))
