From 6197fb60e59f436a872115db70a6130b107698d3 Mon Sep 17 00:00:00 2001
From: Hans Dijkema <hans@dijkewijk.nl>
Date: Wed, 24 Jun 2026 13:34:24 +0200
Subject: [PATCH] We want the original audio bits per sample also.

---
 flac-decoder.rkt | 1 +
 1 file changed, 1 insertion(+)

diff --git a/flac-decoder.rkt b/flac-decoder.rkt
index 71be950..8ff7a90 100644
--- a/flac-decoder.rkt
+++ b/flac-decoder.rkt
@@ -83,6 +83,7 @@
                                  (hash-ref mh 'sample-rate)))))
                (hash-set! mh 'duration duration))
              (set-flac-handle-stream-info! handle si)
+             (hash-set! mh 'audio-bits-per-sample (hash-ref mh 'bits-per-sample))
              (hash-set! mh 'bits-per-sample 32)  ; Flac works internally 32 bits.
              (let ((cb (flac-handle-cb-stream-info handle)))
                (when (procedure? cb)