nog een

2026-06-10 08:45:11 +02:00
parent 930903fb42
commit 3b61e358dc
10 changed files with 190 additions and 63 deletions
@@ -33,7 +33,7 @@
  (make-directory* (let-values ([(base name dir?) (split-path dst)]) base))
  (call-with-output-file dst #:exists 'replace
    (lambda (o) (fprintf o "opus from ~a at ~a" (path->string src) kbps)))
-  (list (cons 'mock #t) (cons 'kbps kbps)))
+  (lambda () kbps))

 (define first-summary
  (manage-flac2opus-tree tmp out #:kbps 192 #:convert-proc mock-convert))