From f6d10672d2c621a9b812142289124e72b869d265 Mon Sep 17 00:00:00 2001 From: Rhiannon Morris Date: Thu, 4 May 2023 02:35:46 +0200 Subject: [PATCH] oops --- langfilter/Main.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/langfilter/Main.hs b/langfilter/Main.hs index b7d2209..71389de 100644 --- a/langfilter/Main.hs +++ b/langfilter/Main.hs @@ -39,7 +39,7 @@ makeBlocks :: Block -> [Block] makeBlocks (Div ("", clss, []) blks) | Just (cls, rest) <- pluck1 ["figure", "aside"] clss = let html = RawBlock $ Format "html" - open = html $ "<" <> cls <> "class='" <> Text.unwords rest <> "'>" + open = html $ "<" <> cls <> " class='" <> Text.unwords rest <> "'>" close = html $ " cls <> ">" in [open] ++ blks ++ [close]