ditto

1 files changed, 1 insertions, 2 deletions

diff --git a/Handler/Common.hs b/Handler/Common.hs
index 3a31883..776d6ff 100644
--- a/Handler/Common.hs
+++ b/Handler/Common.hs
@@ -64,7 +64,7 @@ itemForm proto identView = do
   let kt kWidget tWidget =
         [whamlet|
                 <div .td>^{kWidget}
-               <div .td>^{tWidget}
+                <div .td>^{tWidget}
                 |]
   ((kindRes, typeRes), typedKindWidget) <- typedKindField kt ((itemKind <$> proto), t)
   (boughtRes, boughtWidget) <- dayForm (Just . fromMaybe (DateKnown today) $ itemBought <$> proto) $ DayFormConfig False True True
@@ -208,7 +208,6 @@ typedKindField collate (kindProto, typeProto) = do
              , ("autocomplete", "off")
              ]
   kOptionId <- ("options" <>) . tshow . hashUnique <$> liftIO newUnique
-
   let
     kAttrs = [ ("list", kOptionId)
              , ("autocomplete", "off")