1 files changed, 3 insertions, 3 deletions

diff --git a/lisp/vc.el b/lisp/vc.el
index 77d85352a77..a0db56ce6d7 100644
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -1480,9 +1480,9 @@ merge in the changes into your working copy."
      ((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)