From 050aa51a75171d3b7938bb66432e9c6d5ec53478 Mon Sep 17 00:00:00 2001 From: rf Date: Sat, 24 Sep 2022 13:22:13 -0500 Subject: [PATCH] adjust pipe --- render/render.ml | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/render/render.ml b/render/render.ml index 093d106..9be7b8a 100644 --- a/render/render.ml +++ b/render/render.ml @@ -94,7 +94,7 @@ module Render = struct https://rawley.xyz/blog/%s |eos} - (html_unescape p.title) p.slug + p.title p.slug let @@ -151,7 +151,10 @@ module Render = struct posts_t >>= function | Error e -> handle_error e | Ok posts -> - let () = List.iter (fun t -> generate_rss_item t |> add_str) posts in + let () = List.iter (fun t -> generate_rss_item t + |> html_unescape + |> add_str) posts + in let () = add_str {eos|