From e7620bff05222774e4f46c60b183b4813be3c78f Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Thu, 16 Apr 2020 22:56:38 -0400 Subject: km/magit-branch-archive: Delay refresh until outside loop --- lisp/km-magit.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'lisp/km-magit.el') diff --git a/lisp/km-magit.el b/lisp/km-magit.el index 7ec0214..07e1bbc 100644 --- a/lisp/km-magit.el +++ b/lisp/km-magit.el @@ -259,8 +259,9 @@ argument CHOOSE-SUFFIX, prompt for a suffix to use instead of (if (zerop (magit-call-git "update-ref" new branch-full)) (progn (magit--rename-reflog-file branch-full new) - (magit-run-git "branch" "-D" branch-short)) + (magit-call-git "branch" "-D" branch-short)) (error "update-ref call failed")))) + (magit-refresh) (message (concat "Archived " (let ((num-branches (length branches))) (if (= num-branches 1) -- cgit v1.2.3