This commit is contained in:
m455 2022-12-07 22:37:06 -05:00
parent 07e73e4083
commit 363ed994f4

View file

@ -103,9 +103,9 @@ string-block
(display "</pre>"))
(markdown->html (git-file->string source-file))))
((jpg jpeg png gif webp webm apng avif svgz ico)
(format #t "<p><img src=\"~a\" /></p>" (pathname-strip-directory repository-name) source-file))
(format #t "<p><img src=\"~a\" /></p>" (pathname-strip-directory source-file)))
((svg)
(format #t "<p><img src=\"~a\" /></p>" (pathname-strip-directory repository-name) source-file)
(format #t "<p><img src=\"~a\" /></p>" (pathname-strip-directory source-file))
(display "<pre>")
(display-escaped-html (git-file->string source-file))
(display "</pre>"))