From 3d9954a73564e1e7d8296c50971f3e5c63bf3a02 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Mon, 28 Jun 2021 16:43:33 +0530
Subject: ccwl: Support SVG images in HTML documentation.

* ccwl/skribilo.scm: Add "svg" to the image-format custom of the HTML
engine.
---
 ccwl/skribilo.scm | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'ccwl')

diff --git a/ccwl/skribilo.scm b/ccwl/skribilo.scm
index 7894ad4..0c08a31 100644
--- a/ccwl/skribilo.scm
+++ b/ccwl/skribilo.scm
@@ -129,6 +129,8 @@ and END are line numbers indexed from 1."
 (let ((html-engine (find-engine 'html)))
   (engine-custom-set! html-engine 'css "/style.css")
   (engine-custom-set! html-engine 'charset "UTF-8")
+  (engine-custom-set! html-engine 'image-format
+                      (list "svg" "png" "gif" "jpg" "jpeg"))
   (markup-writer 'abbr html-engine
                  #:options '(#:short #:long)
                  #:action (lambda (markup engine)
-- 
cgit v1.2.3