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 "

" source-file)) + (format #t "

" source-file)) ((svg) - (format #t "

" source-file) + (format #t "

" source-file) (display "
")
      (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 "