summaryrefslogtreecommitdiff
path: root/lisp/vc/vc-arch.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/vc/vc-arch.el')
-rw-r--r--lisp/vc/vc-arch.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/vc/vc-arch.el b/lisp/vc/vc-arch.el
index f94e19271e..e9c65b4920 100644
--- a/lisp/vc/vc-arch.el
+++ b/lisp/vc/vc-arch.el
@@ -321,8 +321,8 @@ CALLBACK expects (ENTRIES &optional MORE-TO-COME); see
(let ((default-directory dir))
(vc-arch-command t 'async nil "changes"))
;; The updating could be done asynchronously.
- (vc-exec-after
- `(vc-arch-after-dir-status ',callback)))
+ (vc-run-delayed
+ (vc-arch-after-dir-status callback)))
(defun vc-arch-after-dir-status (callback)
(let* ((state-map '(("M " . edited)