nog een

2026-06-10 08:45:11 +02:00
parent 930903fb42
commit 3b61e358dc
10 changed files with 190 additions and 63 deletions
@@ -58,7 +58,7 @@
  (set! convert-count (add1 convert-count))
  (call-with-output-file p #:exists 'replace
    (lambda (out) (fprintf out "converted to ~a compression ~a" rate compression)))
-  (list (cons 'mock #t) (cons 'target-sample-rate rate)))
+  (lambda () rate))

 (define first-summary
  (manage-flac-tree tmp #:inspect-flac-proc mock-inspect #:fingerprint-proc mock-fingerprint #:convert-proc mock-convert))