-

private/utils.rkt

@@ -8,6 +8,7 @@
          (prefix-in g: gregor/time)
          gregor-utils
          racket-sprintf
+         simple-log
          )
 
 (provide while
@@ -32,8 +33,18 @@
        date->string
        string->datetime
        datetime->string
+       
+       dbg-webview
+       err-webview
+       info-webview
+       warn-webview
+       fatal-webview
+       
        )
 
+
+(sl-def-log webview)
+
 (define-syntax while
 (syntax-rules ()
   ((_ cond body ...)