diff --git a/wv-window.rkt b/wv-window.rkt
index 0fc08b3..d5c8837 100644
--- a/wv-window.rkt
+++ b/wv-window.rkt
@@ -355,10 +355,11 @@
       (webview-call-js wv js))
 
     (define/public (bind! selector events callback . no-prevent-default)
-      (let ((items (webview-bind! wv selector events (if (null? no-prevent-default)
-                                                         #f
-                                                         (car no-prevent-default))))
-            (events* (if (symbol? events) (list events) events)))
+      (let* ((npd   (if (null? no-prevent-default) #f (car no-prevent-default)))
+             (items (webview-bind! wv selector events npd))
+             (events* (if (symbol? events) (list events) events))
+             )
+        (dbg-webview "No-prevent-default = ~a" npd)
         (map (λ (item)
                     (let ((id (car item))
                           (type (string->symbol (string-downcase (caddr item))))