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