diff --git a/racket-webview-qt.rkt b/racket-webview-qt.rkt
index aba8b5c..c9ca30b 100644
--- a/racket-webview-qt.rkt
+++ b/racket-webview-qt.rkt
@@ -810,7 +810,7 @@
           #t)))
 
 (define (rkt-webview-exit . args)
-  (let ((cl-w (if (null? args) #f (car args)))
+  (let ((cl-w (if (null? args) #t (car args)))
         (msg (if (null? args) #f
                  (if (null? (cdr args))
                      #f