changeset 85175:7d4d92ce0b88

Corrected version of Juanma's fix patch. .
author Eric S. Raymond <esr@snark.thyrsus.com>
date Thu, 11 Oct 2007 16:53:58 +0000
parents 32540f0e375c
children ecc5e7d7b8c6
files lisp/vc.el
diffstat 1 files changed, 3 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/vc.el	Thu Oct 11 16:39:44 2007 +0000
+++ b/lisp/vc.el	Thu Oct 11 16:53:58 2007 +0000
@@ -1882,13 +1882,11 @@
 	;; not available.  Work around that.
 	(if (require 'diff-mode nil t) (diff-mode))
 	(when verbose
-	  (let (buffer-read-only t)
+	  (let (buffer-read-only)
 	    (goto-char (point-max))
-	    (if verbose
-		(insert (format "\n\nDiffs between %s and %s end here." rev1-name rev2-name)))
+	    (insert (format "\n\nDiffs between %s and %s end here." rev1-name rev2-name))
 	    (goto-char (point-min))
-	    (if verbose
-		(insert (format "Diffs between %s and %s:\n\n" rev1-name rev2-name)))))
+	    (insert (format "Diffs between %s and %s:\n\n" rev1-name rev2-name))))
 	(shrink-window-if-larger-than-buffer)
 	t)
     (progn