# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1217712701 0
# Node ID 855f5155ed05483ae20a7fd44c0a1221f902ed36
# Parent  b085ed1433f5817d131366f03c22c1c444cdfa22
(vc-next-action): Update list var correctly after delete.

diff -r b085ed1433f5 -r 855f5155ed05 lisp/vc.el
--- a/lisp/vc.el	Sat Aug 02 21:31:32 2008 +0000
+++ b/lisp/vc.el	Sat Aug 02 21:31:41 2008 +0000
@@ -1085,7 +1085,7 @@
 			 ;; finishing the log entry and committing.
 			 (not (and visited (buffer-modified-p))))
 		(vc-revert-file file)
-		(delete file ready-for-commit)))))
+		(setq ready-for-commit (delete file ready-for-commit))))))
 	;; Remaining files need to be committed
 	(if (not ready-for-commit)
 	    (message "No files remain to be committed")