commit - 3cdb0759b5b41b166c618e8366016b8a33face08
commit + 3d2d3c391f98896699fc27185f56982429b08a7b
blob - 0fb35e5fd22fbb6f7bec382bf26e342753a2cfb5
blob + 19f04bb9fea556fb4d3d1a7d126dbeb11b107ab5
--- vc-got.el
+++ vc-got.el
;; * register DONE
;; - responsible-p DONE
;; - receive-file NOT NEEDED, default `register' works fine
-;; - unregister DONE
+;; - unregister NOT IMPLEMENTED, no use case
;; * checkin DONE
;; * find-revision DONE
;; * checkout NOT IMPLEMENTED
(defun vc-got-register (files &optional _comment)
"Register FILES, passing `vc-register-switches' to the backend command."
(vc-got--add files))
-
-(defun vc-got-unregister (file)
- "Unregister given FILE, i.e. remove file if it was versioned
-file or revert it if it was added but not committed."
- (pcase (status (cdr (vc-got--parse-status (vc-got--status file))))
- ('unregistered nil) ;; no need for action
- ((or 'added 'missing) (vc-got--revert file))
- (_ (vc-got--remove file))))
(defalias 'vc-got-responsible-p #'vc-got-root)