From 531e459af16fc0ac6aa01ba8a31f37575d7ef3d1 Mon Sep 17 00:00:00 2001 From: tux Date: Sun, 27 Apr 2025 01:47:53 +0200 Subject: [PATCH] fix files-in-directory --- book_include.ly | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/book_include.ly b/book_include.ly index ea87159..9832013 100644 --- a/book_include.ly +++ b/book_include.ly @@ -9,7 +9,7 @@ (closedir dir) files) (else - (next (readdir dir) (if (string-match "^(0|\\.)" f) files (cons f files)))))))) + (next (readdir dir) (if (ly:regex-match? (ly:regex-exec (ly:make-regex "^(0|\\.)") f)) files (cons f files)))))))) #(define (file-to-stats filename) (set! song-list (cons filename song-list)))