Add space between checkbox and label

1 files changed, 1 insertions, 0 deletions

diff --git a/Main.hs b/Main.hs
index d03b378..1f60c3e 100644
--- a/Main.hs
+++ b/Main.hs
@@ -271,6 +271,7 @@ features db =
 				dl_ $ forM_ (M.toList $ getFeaturesByBase db baseident) $ \(ident, feature) -> do
 					dt_ [class_ "form-inline"] $ let i = T.pack ("filter-feature-" ++ ident) in do
 						input_ [type_ "checkbox", id_ i, class_ "filter-feature", value_ (T.pack ident)]
+						" "
 						label_ [for_ i] $ toHtml $ fname feature
 					maybe mempty (dd_ . toHtml) $ fdescription feature