From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 28 Aug 1999 18:21:34 +0000 (+0000)
Subject: (diff-parse-differences):
X-Git-Tag: emacs-pretest-21.0.90~7028
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5ef3e90c75faf157b2d8e32233731b89e8e8916b;p=emacs.git

(diff-parse-differences):
Use a marker instead of an integer for `compilation-parsing-end'.
---

diff --git a/lisp/diff.el b/lisp/diff.el
index f181873384b..358ad9a4c24 100644
--- a/lisp/diff.el
+++ b/lisp/diff.el
@@ -161,11 +161,11 @@ is nil, REGEXP matches only half a section.")
 	      ;; We have found as many new loci as the user wants,
 	      ;; or the user wanted a specific diff, and we're past it.
 	  (setq found-desired t)))
-    (if found-desired
-	(setq compilation-parsing-end (point))
-      ;; Set to point-max, not point, so we don't perpetually
-      ;; parse the last bit of text when it isn't a diff header.
-      (setq compilation-parsing-end (point-max)))
+    (set-marker compilation-parsing-end
+		(if found-desired (point)
+		  ;; Set to point-max, not point, so we don't perpetually
+		  ;; parse the last bit of text when it isn't a diff header.
+		  (point-max)))
     (message "Parsing differences...done"))
   (setq compilation-error-list (nreverse compilation-error-list)))