diff --git a/collects/tests/drracket/private/drracket-test-util.rkt b/collects/tests/drracket/private/drracket-test-util.rkt
index 8f3d5533a0..248f5f0fcd 100644
--- a/collects/tests/drracket/private/drracket-test-util.rkt
+++ b/collects/tests/drracket/private/drracket-test-util.rkt
@@ -242,7 +242,8 @@
   (define (queue-callback/res thunk)
     (not-on-eventspace-handler-thread 'queue-callback/res)
     (let ([c (make-channel)])
-      (queue-callback (λ () (channel-put c (with-handlers ((exn:fail? values)) (call-with-values thunk list)))))
+      (queue-callback (λ () (channel-put c (with-handlers ((exn:fail? values)) (call-with-values thunk list))))
+                      #f)
       (define res (channel-get c))
       (when (exn? res) (raise res))
       (apply values res)))