Initial import

2026-06-08 17:20:12 +02:00
parent a3c561d2f2
commit 5e860a3d8b
16 changed files with 702 additions and 1 deletions
@@ -0,0 +1,12 @@
+#lang racket/base
+
+(require racket/file
+         racket/list
+         "util.rkt")
+
+(provide find-flac-files)
+
+(define (find-flac-files base-dir)
+  (sort (find-files flac-path? base-dir)
+        string<?
+        #:key path->string))