From: Philip Kaludercic <philipk@posteo.net>
Date: Sat, 19 Feb 2022 19:29:29 +0000 (+0100)
Subject: ; * rcirc.el (rcirc-print): Prefer sleep-for over sit-for
X-Git-Tag: emacs-29.0.90~2218
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=43237f3d27897e2a0c6de745770802d0ba40e3a5;p=emacs.git

; * rcirc.el (rcirc-print): Prefer sleep-for over sit-for

Compare

	(benchmark-run 100000 (sit-for 0))
	;; => (2.600030102 12 1.523461324000003)

with

	(benchmark-run 100000 (sleep-for 0))
	;; (0.015882939 0 0.0)
---

diff --git a/lisp/net/rcirc.el b/lisp/net/rcirc.el
index 9d1600ed72f..9bbba6dfbee 100644
--- a/lisp/net/rcirc.el
+++ b/lisp/net/rcirc.el
@@ -2043,7 +2043,7 @@ connection."
                        rcirc-log-process-buffers))
           (rcirc-log process sender response target text))
 
-        (sit-for 0)			; displayed text before hook
+        (sleep-for 0)			; displayed text before hook
         (run-hook-with-args 'rcirc-print-functions
                             process sender response target text)))))