This commit is contained in:
2026-02-19 20:29:36 +01:00
parent 111042442f
commit 0fffd544c0
20 changed files with 659 additions and 114 deletions

View File

@@ -2,13 +2,21 @@
(require "gui.rkt"
simple-ini/class
web-racket
racket-sound
)
(ww-set-custom-webui-wire-command! "/home/hans/src/racket/webui-wire/build/Release/webui-wire")
(ww-set-debug #t)
;(ww-tail-log)
(define (run)
(let* ((ini (new ini% [file 'rktplayer]))
(settings (new ww-simple-ini% [ini ini] [section 'player]))
(window (new rktplayer% [settings settings]))
(window (new rktplayer% [settings settings] [use-browser #t]))
)
window)
)
;(run)