From 40b067522fe122668350777451bb5b08e666842b Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Fri, 26 Jul 2019 09:41:30 -0700 Subject: [PATCH] =?utf8?q?Fix=20=E2=80=98make=20check=E2=80=99=20failure?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit Problem introduced in 2019-07-26T07:08:40!larsi@gnus.org. * lisp/emacs-lisp/ert.el (ert-summarize-tests-batch-and-exit): Don’t count "0 unexpected" as unexpected. --- lisp/emacs-lisp/ert.el | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/lisp/emacs-lisp/ert.el b/lisp/emacs-lisp/ert.el index 272fd4aec2f..da241e6304f 100644 --- a/lisp/emacs-lisp/ert.el +++ b/lisp/emacs-lisp/ert.el @@ -1503,9 +1503,10 @@ Ran \\([0-9]+\\) tests, \\([0-9]+\\) results as expected\ (setq nrun (+ nrun (string-to-number (match-string 2))) nexpected (+ nexpected (string-to-number (match-string 3)))) (when (match-string 4) - (push logfile unexpected) - (setq nunexpected (+ nunexpected - (string-to-number (match-string 4))))) + (let ((n (string-to-number (match-string 4)))) + (unless (zerop n) + (push logfile unexpected) + (setq nunexpected (+ nunexpected n))))) (when (match-string 5) (push logfile skipped) (setq nskipped (+ nskipped -- 2.39.5