From fa1c39cc448244cf9260bdec07a14400b0f11a47 Mon Sep 17 00:00:00 2001 From: Kyle Meyer Date: Fri, 20 Jan 2017 23:28:06 -0500 Subject: Delete km/magit-stage-file-intent command This is no longer useful because this functionality was added to Magit in 3584aaba (magit-stage: support --intent-to-add, 2016-05-04). --- lisp/km-magit.el | 18 ------------------ 1 file changed, 18 deletions(-) diff --git a/lisp/km-magit.el b/lisp/km-magit.el index 0fae81e..d8972ba 100644 --- a/lisp/km-magit.el +++ b/lisp/km-magit.el @@ -117,24 +117,6 @@ branch." (magit-merge it '("--ff-only")) (user-error "No upstream branch"))) -(defun km/magit-stage-file-intent (file) - "Stage FILE but not its content. -With a prefix argument or when there is no file at point, ask for -the file to be staged. Otherwise, stage the file at point -without requiring confirmation. -\n(git add -N FILE)" - ;; Modified from `magit-stage-file'. - (interactive - (let* ((atpoint (magit-section-when (file))) - (current (magit-file-relative-name)) - (choices (magit-untracked-files)) - (default (car (member (or atpoint current) choices)))) - (list (if (or current-prefix-arg (not default)) - (magit-completing-read "Stage file" choices - nil t nil nil default) - default)))) - (magit-run-git "add" "-N" file)) - (defun km/magit-push-all () "Push all branches." (interactive) -- cgit v1.2.3