branch: elpa/git-commit
commit 6d6be61ae737fdb1b014cec13843b1d0e31e7062
Author: Jonas Bernoulli <jo...@bernoul.li>
Commit: Jonas Bernoulli <jo...@bernoul.li>

    magit-read-files: Add LIST-FN argument
---
 lisp/magit-diff.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/magit-diff.el b/lisp/magit-diff.el
index b38c17ad98..06ed1f4c1a 100644
--- a/lisp/magit-diff.el
+++ b/lisp/magit-diff.el
@@ -952,9 +952,9 @@ and `:slant'."
   :reader 'magit-read-files
   :multi-value t)
 
-(defun magit-read-files (prompt initial-input history)
+(defun magit-read-files (prompt initial-input history &optional list-fn)
   (magit-completing-read-multiple* prompt
-                                   (magit-list-files)
+                                   (funcall (or list-fn #'magit-list-files))
                                    nil nil
                                    (or initial-input (magit-file-at-point))
                                    history))

Reply via email to