-

rktplayer.rkt

@@ -19,17 +19,17 @@
   )
      
 (ww-set-debug #f)
-(ww-set-log-level 'warning)
+(ww-set-log-level 'info)
 ;(ww-tail-log)
 ;(ww-tail-log)
-;(ao-set-async-mode! 'scheme)
+(ao-set-async-mode! 'scheme)
 ;(collect-garbage 'incremental)
-(ao-set-async-mode! 'ffi)
+;(ao-set-async-mode! 'ffi)
 
 (define (run)
   (let* ((ini (new ini% [file 'rktplayer]))
          (settings (new ww-simple-ini% [ini ini] [section 'player]))
-         (window (new rktplayer% [settings settings] [use-browser #f]))
+         (window (new rktplayer% [settings settings] [use-browser #t]))
          )
     window)
   )