[nongnu] elpa/buttercup 9b230dc 202/340: Fix the "should print the elapsed time for all specs" test

[ELPA Syncer]

branch: elpa/buttercup
commit 9b230dceeb071f6f4d4c9b6e894df19c851b6649
Author: Ola Nilsson <ola.nilsson@gmail.com>
Commit: Ola Nilsson <ola.nilsson@gmail.com>

    Fix the "should print the elapsed time for all specs" test
    
    * Reset the spy calls for buttercup--print for each iteration.  This
      is done before each spec, but in thie spec it has to be done in each
      loop iteration as well.
    * Set the failure-description to avoid 'nil' in buttercup--print
      arguments.
    * Only match at the end of the string, and with leading whitespace.
    * Allow for elapsed times with no decimals.
---
 tests/test-buttercup.el | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/tests/test-buttercup.el b/tests/test-buttercup.el
index 5a660e6..bbcb1f3 100644
--- a/tests/test-buttercup.el
+++ b/tests/test-buttercup.el
@@ -951,7 +951,11 @@
 
       (it "should print the elapsed time for all specs"
         (dolist (state '(pending failed passed))
-          (setq spec (make-buttercup-spec :description "spec" :status state 
:parent child-suite))
+          (spy-calls-reset 'buttercup--print)
+          (setq spec (make-buttercup-spec :description "spec"
+                                          :parent child-suite
+                                          :status state
+                                          :failure-description ""))
           (buttercup--set-start-time spec)
           (buttercup--set-end-time spec)
           (let ((buttercup-reporter-batch--failures nil))
@@ -960,7 +964,7 @@
           (expect (mapconcat (apply-partially #'apply #'format)
                              (spy-calls-all-args 'buttercup--print)
                              "")
-                  :to-match "([0-9]+\\.[0-9]+\\(h\\|m\\|m?s\\))"))))
+                  :to-match " ([0-9]+\\(\\.[0-9]+\\)?\\(h\\|m\\|m?s\\))\n$"))))
 
     (describe "on the suite-done event"
       (it "should emit a newline at the end of the top-level suite"