changeset 85178:8ff5c5a5cd7f

Fix previous change.
author Dan Nicolaescu <dann@ics.uci.edu>
date Thu, 11 Oct 2007 23:32:32 +0000
parents 435ebb14becf
children 8a350c3c191b
files lisp/vc.el
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/vc.el	Thu Oct 11 22:21:17 2007 +0000
+++ b/lisp/vc.el	Thu Oct 11 23:32:32 2007 +0000
@@ -1480,9 +1480,9 @@
      ((stringp state)
       (let ((revision 
 	     (if verbose 
-		 (read-string "Version to steal: ")
-	       (vc-workfile-version file))))
-	(mapc (lambda (file) (vc-steal-lock file version state) files))))
+		 (read-string "Revision to steal: ")
+	       (vc-working-revision file))))
+	(mapc (lambda (file) (vc-steal-lock file revision state) files))))
 	;; needs-patch
      ((eq state 'needs-patch)
       (dolist (file files)