diff options
| author | Eric S. Raymond <esr@snark.thyrsus.com> | 1993-04-16 19:35:22 +0000 |
|---|---|---|
| committer | Eric S. Raymond <esr@snark.thyrsus.com> | 1993-04-16 19:35:22 +0000 |
| commit | ea7c5884cb01ed3eda507245a7bd88a3634df1e9 (patch) | |
| tree | f0db5e9a509b4eb70d9e98336afc3b276d4e105c /lisp/diff.el | |
| parent | 52656e362e8a33bde5022a92f614d18f06c8119e (diff) | |
| download | emacs-ea7c5884cb01ed3eda507245a7bd88a3634df1e9.tar.gz | |
(diff-parse-differences): Small robustification --- don't lose if we
call this with compilation-parsing-end nil
Diffstat (limited to 'lisp/diff.el')
| -rw-r--r-- | lisp/diff.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/diff.el b/lisp/diff.el index bb33689c0f9..c4a83115b2c 100644 --- a/lisp/diff.el +++ b/lisp/diff.el @@ -74,7 +74,7 @@ is nil, REGEXP matches only half a section.") (message "Parsing differences...") ;; Don't reparse diffs already seen at last parse. - (goto-char compilation-parsing-end) + (if compilation-parsing-end (goto-char compilation-parsing-end)) ;; Construct in REGEXP a regexp composed of all those in dired-regexp-alist. (let ((regexp (mapconcat (lambda (elt) @@ -267,4 +267,6 @@ The backup file is the first file given to `diff'." (> (backup-extract-version fn1) (backup-extract-version fn2)))))))))) +(provide 'diff) + ;;; diff.el ends here |