commit - 06d4d3734fd0b273c45f8848c3223516d4164a89
commit + 21914ca959126b8333895482e7d23a4a00cb90d3
blob - 4d7a3bfc3844e53edb05c1584e3823cff06e244c
blob + 4331ad527e62fd19dd81e1fb653ff7e728c8bfc9
--- vc-got-stage.el
+++ vc-got-stage.el
(defun vc-got-stage--apply-impl (script tmp-file)
"Apply the stages using SCRIPT as script (TMP-FILE is the path)."
- (interactive "P")
(let* ((default-directory (vc-find-root default-directory ".got"))
(stage-buf (get-buffer-create "*vc-got-stage*")))
(unless (zerop (apply #'process-file "got" nil stage-buf nil "unstage"