diff --git a/libao-async-ffi-racket.rkt b/libao-async-ffi-racket.rkt index 0b0d35b..7a73545 100644 --- a/libao-async-ffi-racket.rkt +++ b/libao-async-ffi-racket.rkt @@ -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