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>")) (display "</pre>"))
(markdown->html (git-file->string source-file)))) (markdown->html (git-file->string source-file))))
((jpg jpeg png gif webp webm apng avif svgz ico) ((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) ((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 "<pre>")
(display-escaped-html (git-file->string source-file)) (display-escaped-html (git-file->string source-file))
(display "</pre>")) (display "</pre>"))