mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-12-01 08:17:38 +00:00
(vc-git-unregister): New function.
This commit is contained in:
parent
f310189cfa
commit
d7009f45d8
@ -1,6 +1,7 @@
|
||||
2007-07-23 Alexandre Julliard <julliard@winehq.org>
|
||||
|
||||
* vc-git.el (vc-git-delete-file, vc-git-rename-file): New functions.
|
||||
* vc-git.el (vc-git-delete-file, vc-git-rename-file)
|
||||
(vc-git-unregister): New functions.
|
||||
(vc-git-find-version): Use the result of ls-files as a parameter
|
||||
for cat-file
|
||||
|
||||
|
@ -66,7 +66,7 @@
|
||||
;; - responsible-p (file) OK
|
||||
;; - could-register (file) NEEDED
|
||||
;; - receive-file (file rev) ??
|
||||
;; - unregister (file) NEEDED
|
||||
;; - unregister (file) OK
|
||||
;; * checkin (files rev comment) OK
|
||||
;; * find-version (file rev buffer) OK
|
||||
;; * checkout (file &optional editable rev) OK
|
||||
@ -231,6 +231,10 @@
|
||||
|
||||
(defalias 'vc-git-responsible-p 'vc-git-root)
|
||||
|
||||
(defun vc-git-unregister (file)
|
||||
(vc-git-command nil 0 file "rm" "-f" "--cached" "--"))
|
||||
|
||||
|
||||
(defun vc-git-checkin (files rev comment)
|
||||
(let ((coding-system-for-write git-commits-coding-system))
|
||||
(vc-git-command nil 0 files "commit" "-m" comment "--only" "--")))
|
||||
|
Loading…
Reference in New Issue
Block a user