Mercurial > emacs
diff lisp/diff.el @ 99893:34f4c0ab1342
(diff-sentinel): Take note of diff error return value.
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Mon, 24 Nov 2008 21:11:12 +0000 |
| parents | ee5932bf781d |
| children | d42aff5ca541 |
line wrap: on
line diff
--- a/lisp/diff.el Mon Nov 24 21:01:14 2008 +0000 +++ b/lisp/diff.el Mon Nov 24 21:11:12 2008 +0000 @@ -68,7 +68,9 @@ (goto-char (point-max)) (let ((inhibit-read-only t)) (insert (format "\nDiff finished%s. %s\n" - (if (equal 0 code) " (no differences)" "") + (cond ((equal 0 code) " (no differences)") + ((equal 2 code) " (diff error)") + (t "")) (current-time-string)))))) (defvar diff-old-file nil)
