From e039c29a83065358fc9bd94321bfad4ef97e49ab Mon Sep 17 00:00:00 2001 From: pho4cexa Date: Thu, 23 Feb 2023 23:33:53 -0800 Subject: [PATCH] don't break on empty file in ISSUES/ --- repo2html.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/repo2html.scm b/repo2html.scm index 4620b2d..385359d 100755 --- a/repo2html.scm +++ b/repo2html.scm @@ -201,7 +201,7 @@ ,(-> source-file git-file->lines - ((lambda (x) (if (eof-object? x) (list (pathname-strip-directory source-file)) x))) + ((lambda (x) (if (or (eof-object? x) (null-list? x)) (list (pathname-strip-directory source-file)) x))) car (string-trim (string->char-set "# "))))))) source-files-list)))))