Mercurial > emacs
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)