paused handling
This commit is contained in:
@@ -469,9 +469,9 @@
|
||||
(mutex-lock (ao-handle-pause-mutex h))
|
||||
(mutex-unlock (ao-handle-pause-mutex h))
|
||||
(mutex-lock (ao-handle-clear-mutex h))
|
||||
(let ((if (ao-handle-paused h)
|
||||
#f
|
||||
(elem (get h 250))))
|
||||
(let ((elem (if (ao-handle-paused h)
|
||||
#f
|
||||
(get h 150))))
|
||||
(mutex-unlock (ao-handle-clear-mutex h))
|
||||
(if (eq? elem #f)
|
||||
(begin
|
||||
|
||||
Reference in New Issue
Block a user