# HG changeset patch # User Richard M. Stallman # Date 935864494 0 # Node ID c23f7efbfd57001c9899fe89c617eee4592fa6a1 # Parent 27c66621737f1ff7fe134dc8138e51ec75aee463 (diff-parse-differences): Use a marker instead of an integer for `compilation-parsing-end'. diff -r 27c66621737f -r c23f7efbfd57 lisp/diff.el --- a/lisp/diff.el Sat Aug 28 15:21:55 1999 +0000 +++ b/lisp/diff.el Sat Aug 28 18:21:34 1999 +0000 @@ -161,11 +161,11 @@ ;; 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)))