innerHTmL problems. Not synchronous?

racket-webview.rkt

@@ -274,7 +274,7 @@
                  (if (or (eq? ext 'html) (eq? ext 'htm))
                      (process-html context file-to-serve out)
                      (process-file context ext file-to-serve out))
-                 (dbg-webview "output to output port had been done")
+                 (dbg-webview "output to output port has been done")
                  ))
               (response/output
                #:code 404

wv-window.rkt

@@ -111,6 +111,7 @@
                              (if (= js-type -1)
                                  'unknown
                                  (string->symbol (string-downcase js-type))))))
+            )
           (let ((cl (cond
                       ((eq? type 'text) wv-input/text%)
                       ((eq? type 'date) wv-input/date%)
@@ -129,7 +130,7 @@
                         )))
             (set! elem (new cl [window this] [element-id id]))
             (hash-set! element-hash id elem))
-            ))
+          )
         (displayln (format "element ~a: ~a" id elem))
         elem
         )