[nongnu] elpa/with-simulated-input 049c120764 045/134: Extend tests a bit

[ELPA Syncer]

branch: elpa/with-simulated-input
commit 049c120764c7d2f38777ec4293a9509c1602b1d1
Author: Ryan C. Thompson <rct@thompsonclan.org>
Commit: Ryan C. Thompson <rct@thompsonclan.org>

    Extend tests a bit
---
 tests/test-with-simulated-input.el | 11 +++++++++--
 1 file changed, 9 insertions(+), 2 deletions(-)

diff --git a/tests/test-with-simulated-input.el 
b/tests/test-with-simulated-input.el
index 24be75b80e..ff21b10cb8 100644
--- a/tests/test-with-simulated-input.el
+++ b/tests/test-with-simulated-input.el
@@ -200,8 +200,12 @@
   (it "should run idle timers added by other idle timers when the new timer is 
in the past"
     (run-with-idle-timer
      100 nil 'run-with-idle-timer
+     90 nil 'run-with-idle-timer
+     80 nil 'run-with-idle-timer
+     70 nil 'run-with-idle-timer
+     60 nil 'run-with-idle-timer
      50 nil 'idle-canary)
-    (wsi-simulate-idle-time 500)
+    (wsi-simulate-idle-time 110)
     (expect 'idle-canary :to-have-been-called))
 
   (it "should run all idle timers when called with SECS = nil"
@@ -215,7 +219,10 @@
     (it "should allow idle timers to trigger during simulated input"
       (run-with-idle-timer 500 nil 'insert "world")
       (expect
-       (with-simulated-input '("hello SPC" (wsi-simulate-idle-time 501) "RET")
+       (with-simulated-input
+           '("hello SPC"
+             (wsi-simulate-idle-time 501)
+             "RET")
          (read-string "Enter a string: "))
        :to-equal "hello world"))))