diff options
| -rw-r--r-- | lisp/km-magit.el | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/lisp/km-magit.el b/lisp/km-magit.el index 3ec0289..146a223 100644 --- a/lisp/km-magit.el +++ b/lisp/km-magit.el @@ -164,11 +164,10 @@ namespace." (defun km/magit-toggle-remote-skip (remote) "Toggle REMOTE.skipFetchAll value." (interactive (list (magit-read-remote "Remote"))) - (let ((keys (list "remote" remote "skipFetchAll"))) - (apply #'magit-set - (and (not (apply #'magit-get-boolean keys)) - "true") - keys))) + (let* ((keys (list "remote" remote "skipFetchAll")) + (skipped-p (apply #'magit-get-boolean keys))) + (apply #'magit-set (and (not skipped-p) "true") keys) + (message "%sabled %s" (if skipped-p "En" "Dis") remote))) (defun km/magit-branch-rename (old new &optional force) "Like `magit-branch-rename', but use old branch as initial prompt." |