# HG changeset patch
# User Stefan Monnier <monnier@iro.umontreal.ca>
# Date 1290660236 18000
# Node ID aa580ff3975aa2e548579a2a8c4e6dc8b03f8e6b
# Parent  aa78024b08672fac1b0c58bfc0e53b466ff277e1
* lisp/vc/diff.el (diff): Fix last change.

diff -r aa78024b0867 -r aa580ff3975a lisp/ChangeLog
--- a/lisp/ChangeLog	Thu Nov 25 01:13:37 2010 +0000
+++ b/lisp/ChangeLog	Wed Nov 24 23:43:56 2010 -0500
@@ -1,3 +1,7 @@
+2010-11-25  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+	* vc/diff.el (diff): Fix last change.
+
 2010-11-24  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	* emacs-lisp/pcase.el: Improve pcase-let.  Use "pcase--" prefix.
diff -r aa78024b0867 -r aa580ff3975a lisp/vc/diff.el
--- a/lisp/vc/diff.el	Thu Nov 25 01:13:37 2010 +0000
+++ b/lisp/vc/diff.el	Wed Nov 24 23:43:56 2010 -0500
@@ -84,8 +84,8 @@
 interactively for diff switches.  Otherwise, the switches
 specified in `diff-switches' are passed to the diff command."
   (interactive
-   (let ((newf (buffer-file-name))
-         (oldf (file-newest-backup newf)))
+   (let* ((newf (buffer-file-name))
+          (oldf (file-newest-backup newf)))
      (setq newf (if (and newf (file-exists-p newf))
 		    (read-file-name
 		     (concat "Diff new file (default "