audio decoding

2026-04-21 22:53:31 +02:00
parent c28357cfca
commit 1fdd7eb204
6 changed files with 145 additions and 13 deletions
@@ -18,9 +18,6 @@
 (sl-log-to-file log-file)
 ;(sl-log-to-display)

-(displayln (format "Logging to file ~a" log-file))
-
-
 (define (my-file-getter url)
  (dbg-rktplayer "my-file-getter - url = ~a" url)
  (when (string-prefix? url "/")
@@ -45,12 +42,13 @@
                       [ini ini]
                       [file-getter my-file-getter]
                       ))
-         (window (new rktplayer% [wv-context context]))
         )
-    ;(send window devtools)
+    (let (
+         (window (new rktplayer% [wv-context context] [log-file log-file]))
+         )
    (webview-wait-for-quit)
    (webview-exit)
-    (exit)
+    (exit))
    )
  )