aboutsummaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorMarc Coquand <marcc@fastmail.fr>2023-12-04 06:34:28 -0600
committerMarc Coquand <marcc@fastmail.fr>2023-12-04 06:34:28 -0600
commitebfa52418cfa47fc58afec062ca06709399f7e2f (patch)
tree90c61b346fc669b9006540e5f9f905197f797a35 /lib
parent5a51a70a6ffb40b568be50c2245d8f6178b4c477 (diff)
downloadwormhole-ebfa52418cfa47fc58afec062ca06709399f7e2f.tar.gz
wormhole-ebfa52418cfa47fc58afec062ca06709399f7e2f.tar.bz2
wormhole-ebfa52418cfa47fc58afec062ca06709399f7e2f.zip
Don't escape characters
Diffstat (limited to '')
-rw-r--r--lib/post.ml3
1 files changed, 2 insertions, 1 deletions
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 ];
]