innerHTmL problems. Not synchronous?

2026-04-15 20:41:19 +02:00
parent ef91a15cb7
commit e19afc324a
1 changed files with 3 additions and 2 deletions
--- a/wv-window.rkt
+++ b/wv-window.rkt
@@ -105,11 +105,12 @@
                                              "    }"
                                              "  }\n"
                                              "}")
-                                             id))))
+                                             id)))
              (set! type (if (eq? js-type #f)
+                             #f
                             (if (= js-type -1)
                                 'unknown
-                                 (string->symbol (string-downcase js-type)))))
+                                 (string->symbol (string-downcase js-type))))))
            (let ((cl (cond
                        ((eq? type 'text) wv-input/text%)
                        ((eq? type 'date) wv-input/date%)