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

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

[elpa] externals/urgrep e33a953b72 2/6: Use `accept-process-output` inst


From: ELPA Syncer
Subject: [elpa] externals/urgrep e33a953b72 2/6: Use `accept-process-output` instead of `sit-for`
Date: Wed, 7 Jun 2023 16:00:31 -0400 (EDT)

branch: externals/urgrep
commit e33a953b724acb9093051befdcb748f10daea40a
Author: Jim Porter <jporterbugs@gmail.com>
Commit: Jim Porter <jporterbugs@gmail.com>

    Use `accept-process-output` instead of `sit-for`
---
 urgrep-tests.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/urgrep-tests.el b/urgrep-tests.el
index 975e3c6a98..867575baa0 100644
--- a/urgrep-tests.el
+++ b/urgrep-tests.el
@@ -575,7 +575,7 @@ joined to compare against COMMAND."
 (ert-deftest urgrep-tests/urgrep/group ()
   (switch-to-buffer (urgrep "urgrep"))
   (while (get-buffer-process (current-buffer))
-    (sit-for 0.01))
+    (accept-process-output))
   (should (and (equal urgrep-current-tool (urgrep-get-tool))
                (local-variable-p 'urgrep-current-tool)))
   (should (and (equal urgrep-current-query '("urgrep"))
@@ -588,7 +588,7 @@ joined to compare against COMMAND."
 (ert-deftest urgrep-tests/urgrep/no-group ()
   (switch-to-buffer (urgrep "urgrep" :group nil))
   (while (get-buffer-process (current-buffer))
-    (sit-for 0.01))
+    (accept-process-output))
   (should (and (equal urgrep-current-tool (urgrep-get-tool))
                (local-variable-p 'urgrep-current-tool)))
   (should (and (equal urgrep-current-query '("urgrep" :group nil))
@@ -600,7 +600,7 @@ joined to compare against COMMAND."
 (ert-deftest urgrep-tests/urgrep-run-command ()
   (switch-to-buffer (urgrep-run-command (urgrep-command "urgrep") nil nil))
   (while (get-buffer-process (current-buffer))
-    (sit-for 0.01))
+    (accept-process-output))
   (should (and (equal urgrep-current-tool (urgrep-get-tool))
                (local-variable-p 'urgrep-current-tool)))
   (should (and (equal urgrep-current-query (urgrep-command "urgrep"))



reply via email to

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