Better logging small bug in wv-dialog, conversion to stdio.

example1/example.rkt

@@ -310,7 +310,8 @@
 (webview-set-loglevel 'debug)
 (define log-file (build-path (find-system-path 'temp-dir) "example1.log"))
 (displayln (format "logging to ~a" log-file))
-(sl-log-to-file log-file)
+;(sl-log-to-file log-file)
+(define store (sl-log-to-store 10000))
 
 (define (run-example)
   (let* ((ini (new ini% [file 'web-racket-example1]))
@@ -327,5 +328,5 @@
   (let ((window (run-example)))
     (webview-wait-for-quit)
     (webview-exit)
-    (exit)
+    ;(exit)
     ))