diff options
| -rw-r--r-- | init.el | 3 | ||||
| -rw-r--r-- | lisp/km-magit.el | 12 |
2 files changed, 0 insertions, 15 deletions
@@ -1171,9 +1171,6 @@ ?c "Create & checkout from current" #'km/magit-branch-and-checkout-from-current) - (magit-define-popup-action 'magit-stash-popup - ?e "Edit message" #'km/magit-stash-edit-message) - (magit-define-popup-action 'magit-branch-popup ?m "Checkout master" #'km/magit-checkout-master) (magit-define-popup-action 'magit-branch-popup diff --git a/lisp/km-magit.el b/lisp/km-magit.el index 332dc30..9603171 100644 --- a/lisp/km-magit.el +++ b/lisp/km-magit.el @@ -553,18 +553,6 @@ argument. Interactively, this can be accessed using the command (interactive "P") (km/magit-diff-visit-file prev-rev t)) -(defun km/magit-stash-edit-message (stash message) - "Change STASH's message to MESSAGE." - (interactive - (let* ((stash (magit-read-stash "Rename" t)) - (old-msg (magit-git-string "show" "-s" "--format=%s" stash))) - (list stash (magit-read-string "Stash message" old-msg)))) - (let ((commit (magit-rev-parse stash)) - (inhibit-magit-refresh t)) - (magit-stash-drop stash) - (magit-stash-store message "refs/stash" commit)) - (magit-refresh)) - (defun km/magit-log-current (&optional args files) "Like `magit-log-current', but if head is detached, use \"HEAD\"." (interactive (magit-log-arguments)) |