From: Dmitry Gutov <dgutov@yandex.ru>
Date: Sat, 23 May 2020 02:08:06 +0000 (+0300)
Subject: Implement 'mark-resolved' for the Git backend
X-Git-Tag: emacs-28.0.90~7301
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c67f8f298a21be61362d049cfff5273f7d010d75;p=emacs.git

Implement 'mark-resolved' for the Git backend

* lisp/vc/vc-git.el (vc-git-mark-resolved): New function.
---

diff --git a/lisp/vc/vc-git.el b/lisp/vc/vc-git.el
index 2caa287bce2..dcb52282656 100644
--- a/lisp/vc/vc-git.el
+++ b/lisp/vc/vc-git.el
@@ -72,6 +72,7 @@
 ;;                                          by git, so it's probably
 ;;                                          not a good idea.
 ;; - merge-news (file)                      see `merge-file'
+;; - mark-resolved (file)                          OK
 ;; - steal-lock (file &optional revision)          NOT NEEDED
 ;; HISTORY FUNCTIONS
 ;; * print-log (files buffer &optional shortlog start-revision limit)   OK
@@ -1530,6 +1531,9 @@ This requires git 1.8.4 or later, for the \"-L\" option of \"git log\"."
 (defun vc-git-rename-file (old new)
   (vc-git-command nil 0 (list old new) "mv" "-f" "--"))
 
+(defun vc-git-mark-resolved (files)
+  (vc-git-command nil 0 files "add"))
+
 (defvar vc-git-extra-menu-map
   (let ((map (make-sparse-keymap)))
     (define-key map [git-grep]