(vc-cvs-delete-file): Commit the file after removing it.

bd25cb26 · André Spiegel · 5e7ae3bd · bd25cb26
Commit bd25cb26 authored Oct 30, 2005 by André Spiegel
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 1 deletion

lisp/vc-cvs.el lisp/vc-cvs.el +2 -1

No files found.
--- a/lisp/vc-cvs.el
+++ b/lisp/vc-cvs.el
@@ -452,7 +452,8 @@ REV is the revision to check out into WORKFILE."
 	(message "Checking out %s...done" filename)))))

 (defun vc-cvs-delete-file (file)
-  (vc-cvs-command nil 0 file "remove" "-f"))
+  (vc-cvs-command nil 0 file "remove" "-f")
+  (vc-cvs-command nil 0 file "commit" "-mRemoved."))

 (defun vc-cvs-revert (file &optional contents-done)
  "Revert FILE to the version it was based on."