diff --git a/racket-webview.rkt b/racket-webview.rkt
index 06dc114..98f5573 100644
--- a/racket-webview.rkt
+++ b/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
diff --git a/wv-window.rkt b/wv-window.rkt
index 8e332d4..e83f601 100644
--- a/wv-window.rkt
+++ b/wv-window.rkt
@@ -111,25 +111,26 @@
                              (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%)
-                        ((eq? type 'time) wv-input/time%)
-                        ((eq? type 'datetime-local) wv-input/datetime%)
-                        ((eq? type 'range) wv-input/range%)
-                        ((eq? type 'number) wv-input/number%)
-                        ((eq? type 'checkbox) wv-input/check%)
-                        ((eq? type 'radio) wv-input/radio%)
-                        ((eq? type 'color) wv-input/color%)
-                        ((eq? type 'unknown) (begin
-                                               (err-webview "Element with id '~a' not found"
-                                                            id)
-                                               wv-element%))
+            )
+          (let ((cl (cond
+                      ((eq? type 'text) wv-input/text%)
+                      ((eq? type 'date) wv-input/date%)
+                      ((eq? type 'time) wv-input/time%)
+                      ((eq? type 'datetime-local) wv-input/datetime%)
+                      ((eq? type 'range) wv-input/range%)
+                      ((eq? type 'number) wv-input/number%)
+                      ((eq? type 'checkbox) wv-input/check%)
+                      ((eq? type 'radio) wv-input/radio%)
+                      ((eq? type 'color) wv-input/color%)
+                      ((eq? type 'unknown) (begin
+                                             (err-webview "Element with id '~a' not found"
+                                                          id)
+                                             wv-element%))
                         (else wv-element%)
                         )))
-              (set! elem (new cl [window this] [element-id id]))
-              (hash-set! element-hash id elem))
-            ))
+            (set! elem (new cl [window this] [element-id id]))
+            (hash-set! element-hash id elem))
+          )
         (displayln (format "element ~a: ~a" id elem))
         elem
         )