projects / riece / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: 6d046bc)
Fixed.
authorDaiki Ueno <ueno@unixuser.org>
Mon, 7 Feb 2005 03:24:35 +0000 (03:24 +0000)
committerDaiki Ueno <ueno@unixuser.org>
Mon, 7 Feb 2005 03:24:35 +0000 (03:24 +0000)
lisp/riece-filter.el patch | blob | history

diff --git a/lisp/riece-filter.el b/lisp/riece-filter.el
index cf32989..084c1dc 100644 (file)
--- 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)
 (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."
 
 (defun riece-release-semaphore (semaphore)
   "Release SEMAPHORE."
Steve's Riece Repo