(vc-checkout): Typo.

2 files changed, 5 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d7d58bdcca6..1f40087d0e0 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2008-04-30  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+        * vc.el (vc-checkout): Typo.
+
 2008-04-30  Dan Nicolaescu  <dann@ics.uci.edu>
 
         * menu-bar.el (menu-bar-tools-menu): Reorder, place Games last.
diff --git a/lisp/vc.el b/lisp/vc.el
index 89e419bc5a8..33148db22df 100644
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -1953,7 +1953,7 @@ After check-out, runs the normal hook `vc-checkout-hook'."
   (let ((backend (vc-backend file)))
     (with-vc-properties (list file)
       (condition-case err
-          (vc-call-backend 'checkout file writable rev)
+          (vc-call-backend backend 'checkout file writable rev)
         (file-error
          ;; Maybe the backend is not installed ;-(
          (when writable