summaryrefslogtreecommitdiff
path: root/lisp/km-magit.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/km-magit.el')
-rw-r--r--lisp/km-magit.el3
1 files changed, 2 insertions, 1 deletions
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)