From dd174469d91f5a9c8d70e6db3d7fcf026b59ba3d Mon Sep 17 00:00:00 2001 From: Hans Dijkema Date: Thu, 26 Feb 2026 17:46:07 +0100 Subject: [PATCH] - --- libtag/taglib.rkt | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/libtag/taglib.rkt b/libtag/taglib.rkt index 7d1e8ff..2cf3fa9 100644 --- a/libtag/taglib.rkt +++ b/libtag/taglib.rkt @@ -67,7 +67,9 @@ (disc-number -1) (picture #f)) (let ((tag-file (taglib_file_new file))) - (set! valid? (taglib_file_is_valid tag-file)) + (if (eq? tag-file #f) + (set! valid? #f) + (set! valid? (taglib_file_is_valid tag-file))) (when valid? (let ((tag (taglib_file_tag tag-file)) (ap (taglib_file_audioproperties tag-file))