diff --git a/racket-webview.rkt b/racket-webview.rkt
index cdde989..9f2fa04 100644
--- a/racket-webview.rkt
+++ b/racket-webview.rkt
@@ -1042,7 +1042,7 @@
                           (return (list (list 'id id)
                                         (list 'style (send Object entries r))))))))
           )
-      (displayln js-code)
+      ;(displayln js-code)
       (let ((r (webview-call-js wv js-code)))
       ;                       (format
       ;                        (js-code
@@ -1056,7 +1056,7 @@
       ;                         "  return { id: id, style: r };"
       ;                         "}") cl))
       ;                     )))
-        (display "Result: ") (write r) (newline)
+        ;(display "Result: ") (write r) (newline)
         (if (eq? r #f)
             #f
             (let ((h (hash-ref r 'with-ids)))
@@ -1067,8 +1067,8 @@
                                        (make-hash (map (λ (e) (cons (to-symbol (car e)) (cadr e))) (cadr style-rec)))
                                        )
                                  )) h)))
-                (displayln (format "l = ~a" l))
-                (write l)(newline)
+                ;(displayln (format "l = ~a" l))
+                ;(write l)(newline)
               ; l = ((volume-meter . #hash((display . none))))
               ; ((volume-meter . #hash(("display" . "none"))))
                 (if (symbol? selector)
diff --git a/wv-element.rkt b/wv-element.rkt
index aa20868..90e8800 100644
--- a/wv-element.rkt
+++ b/wv-element.rkt
@@ -53,11 +53,11 @@
         (let ((d* (string->symbol (format "~a" (car d)))))
           (webview-set-style! wv element-id (list 'display d*))))
       (let ((style-hash (webview-get-style wv element-id 'display)))
-        (displ "style-hash: ") (write style-hash) (newline)
+        ;(displ "style-hash: ") (write style-hash) (newline)
         (let ((display-style (hash-ref (if (eq? style-hash #f)
                                            (make-hash)
                                            style-hash) 'display #f)))
-          (displayln display-style)
+          ;(displayln display-style)
           (if (eq? display-style #f)
               #f
               (string->symbol display-style)))))