emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master 4c1f6cd 094/184: ivy-test.el: Update


From: Oleh Krehel
Subject: [elpa] master 4c1f6cd 094/184: ivy-test.el: Update
Date: Wed, 16 Oct 2019 13:14:58 -0400 (EDT)

branch: master
commit 4c1f6cd9dec881ea4289368fd08462f42f9b8f94
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>

    ivy-test.el: Update
---
 ivy-test.el | 23 +++++++++++++----------
 1 file changed, 13 insertions(+), 10 deletions(-)

diff --git a/ivy-test.el b/ivy-test.el
index 3faa04e..1bd6974 100644
--- a/ivy-test.el
+++ b/ivy-test.el
@@ -1417,16 +1417,19 @@ a buffer visiting a file."
                    "/sudo::/tmp/")))
 
 (defun ivy-test-run-tests ()
-  (let ((stats1
-         ;; this test must run first as other tests might force a load
-         (ert-run-tests-batch 'ivy--lazy-load-ffap--ffap-url-p))
-        (stats2
-         ;; run the rest of the tests
-         (ert-run-tests-batch '(not ivy--lazy-load-ffap--ffap-url-p))))
-    (kill-emacs (if (zerop (+ (ert-stats-completed-unexpected stats1)
-                              (ert-stats-completed-unexpected stats2)))
-                    0
-                  1))))
+  (let ((test-sets
+         '(
+           ;; this test must run first as other tests might force a load
+           ivy--lazy-load-ffap--ffap-url-p
+           ;; run the rest of the tests
+           (not ivy--lazy-load-ffap--ffap-url-p)))
+        (unexpected 0))
+    (dolist (test-set test-sets)
+      (cl-incf
+       unexpected
+       (ert-stats-completed-unexpected
+        (ert-run-tests-batch test-set))))
+    (kill-emacs (if (zerop unexpected) 0 1))))
 
 (provide 'ivy-test)
 



reply via email to

[Prev in Thread] Current Thread [Next in Thread]