summaryrefslogtreecommitdiff
path: root/piem.el
diff options
context:
space:
mode:
Diffstat (limited to 'piem.el')
-rw-r--r--piem.el9
1 files changed, 6 insertions, 3 deletions
diff --git a/piem.el b/piem.el
index 145d4aa..6551c82 100644
--- a/piem.el
+++ b/piem.el
@@ -521,6 +521,8 @@ in `piem-default-branch-function'."
(piem--shorten-subject subject)
(and version (concat "__" version))))))
+(defvar piem-am-args (list "--scissors"))
+
;;;###autoload
(defun piem-am (mbox &optional info coderepo)
"Feed an am-ready mbox to `git am'.
@@ -558,9 +560,10 @@ If CODEREPO is given, switch to this directory before calling
(and (not (string-blank-p base))
(list base)))))
(if (bufferp mbox)
- (piem-process-call-with-buffer-input
- nil mbox piem-git-executable "am" "--scissors")
- (piem-process-call nil piem-git-executable "am" "--scissors" mbox))
+ (apply #'piem-process-call-with-buffer-input
+ nil mbox piem-git-executable "am" piem-am-args)
+ (apply #'piem-process-call nil piem-git-executable "am"
+ (append piem-am-args (list mbox))))
(if (and piem-use-magit
(fboundp 'magit-status-setup-buffer))
(magit-status-setup-buffer)