From 18ddbd6e91dfc8cee21c289a43c5b9bf509870ae Mon Sep 17 00:00:00 2001 From: Daiki Ueno Date: Mon, 7 Feb 2005 03:24:35 +0000 Subject: [PATCH] Fixed. --- lisp/riece-filter.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/riece-filter.el b/lisp/riece-filter.el index cf32989..084c1dc 100644 --- a/lisp/riece-filter.el +++ b/lisp/riece-filter.el @@ -68,7 +68,7 @@ (defun riece-get-semaphore (semaphore) "Wait until SEMAPHORE is released." (while (/= (length (nconc (symbol-value semaphore) (list nil))) 2) - (sleep-for 1))) + (sleep-for 0.1))) (defun riece-release-semaphore (semaphore) "Release SEMAPHORE." -- 2.25.1