webview-get-style debugging

racket-webview.rkt

@@ -1063,6 +1063,8 @@
                                      (make-hash (map (λ (e) (cons (car e) (cadr e))) (cadr style-rec)))
                                      )
                                )) h)))
+              (displayln (format "l = ~a" l))
+              (write l)(newline)
               (if (symbol? selector)
                   (cdr (car l))
                   l))))