diff --git a/main.scm b/main.scm index cf82c02..010823c 100755 --- a/main.scm +++ b/main.scm @@ -103,9 +103,9 @@ string-block (display "")) (markdown->html (git-file->string source-file)))) ((jpg jpeg png gif webp webm apng avif svgz ico) - (format #t "
") (display-escaped-html (git-file->string source-file)) (display "")) @@ -116,7 +116,9 @@ string-block (display-escaped-html (git-file->string source-file)) (display "")) (else - (display "
(Unknown file type)
")))) + (display "") + (display-escaped-html (git-file->string source-file)) + (display "")))) (define (display-files-html source-files-list) (display "