on develop help sign in
Remove extra space after element tags.
commit65c6ae1d16f44bc5f5e670a9dce11b1a23e7726b authorLuigy Leon <luigy@outlook.com> dateSat 12 Nov 2016, 19:13 (10 years ago) parentb0cbeed
1 file changed+1−1
src/Reflex/Dom/Builder/Static.hs+1−1
src/Reflex/Dom/Builder/Static.hs+1−1
@@ -189,7 +189,7 @@ instance SupportsStaticDomBuilder t m => DomBuilder t (StaticDomBuilderT t m) wh
189189 if Set.member elementTag voidElements
190190 then modify $ (:) $ mconcat [constant ("<" <> byteString tagBS), attrs1, constant (byteString " />")]
191191 else do
192− let open = mconcat [constant ("<" <> byteString tagBS <> " "), attrs1, constant (byteString ">")]
192+ let open = mconcat [constant ("<" <> byteString tagBS), attrs1, constant (byteString ">")]
193193 let close = constant $ byteString $ "</" <> tagBS <> ">"
194194 modify $ (:) $ mconcat [open, innerHtml, close]
195195 return (Element es (), result)