diff --git a/racket-webview-qt.rkt b/racket-webview-qt.rkt
index 743974f..fa170b6 100644
--- a/racket-webview-qt.rkt
+++ b/racket-webview-qt.rkt
@@ -886,7 +886,8 @@
     (event-callback evt-guard-stop)
     (dbg-webview "Waiting for thread to stop")
     (while (not (eq? evt-processing-thread #f))
-           (sleep 0.01))
+           (dbg-webview "evt-processing-thread = ~a" evt-processing-thread)
+           (sleep 1))
     (dbg-webview "Event processing stopped")
 
     ; cleanup the library