Commit 36bed8bc authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(vc-version-diff): Don't move point in current buffer.

parent 41e7816a
......@@ -775,15 +775,9 @@ files in or below it."
(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*")
)
)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment