From ebfa52418cfa47fc58afec062ca06709399f7e2f Mon Sep 17 00:00:00 2001 From: Marc Coquand Date: Mon, 4 Dec 2023 06:34:28 -0600 Subject: Don't escape characters --- lib/post.ml | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lib/post.ml b/lib/post.ml index dbca936..b542310 100644 --- a/lib/post.ml +++ b/lib/post.ml @@ -8,6 +8,7 @@ type t = { author : string; author_link : string; } +[@@deriving yojson] let published t = t.published @@ -20,7 +21,7 @@ let to_rss_entry post = Xml.tag "id" [] [ Xml.entry post.link ]; Xml.tag "updated" [] [ Xml.entry post.published ]; Xml.tag "summary" - [ ("xml:lang", "\"en\""); ("type", "\"html\"") ] + [ ("xml:lang", "en"); ("type", "html") ] [ Xml.entry post.summary ]; ] -- cgit v1.2.3