Mercurial > emacs

changeset 2769:209f745babd1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(vc-version-diff): Don't move point in current buffer.
author Richard M. Stallman <rms@gnu.org>
date Thu, 13 May 1993 12:05:52 +0000
parents 82797c755adc
children 6574a888b539
files lisp/vc.el
diffstat 1 files changed, 3 insertions(+), 9 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/vc.el	Thu May 13 05:28:14 1993 +0000
+++ b/lisp/vc.el	Thu May 13 12:05:52 1993 +0000
@@ -775,15 +775,9 @@
 	(goto-char (point-min))
 	(set-buffer-modified-p nil)
 	)
-    (progn
-      (vc-backend-diff file rel1 rel2)
-      (goto-char (point-min))
-      (if (equal (point-min) (point-max))
-	  (message "No changes to %s between %s and %s." file rel1 rel2)
-	(pop-to-buffer "*vc*")
-	(goto-char (point-min))
-	)
-      )
+    (if (zerop (vc-backend-diff file rel1 rel2))
+	(message "No changes to %s between %s and %s." file rel1 rel2)
+      (pop-to-buffer "*vc*")
     )
   )