1 files changed, 1 insertions, 1 deletions

diff --git a/Handler/UpdateItem.hs b/Handler/UpdateItem.hs
index ce6b30d..ebd29e4 100644
--- a/Handler/UpdateItem.hs
+++ b/Handler/UpdateItem.hs
@@ -13,7 +13,7 @@ postUpdateItemR fsUpdateId = do
 
   case updateResult of 
     FormSuccess (Item{..} `WithType` t) -> runDB $ do
-      upsertBy (UniqueKind itemNormKind) (Kind itemNormKind t) [ KindType =. t ]
+      void $ upsertBy (UniqueKind itemNormKind) (Kind itemNormKind t) [ KindType =. t ]
       update fsUpdateId [ ItemKind =. itemKind
                         , ItemNormKind =. itemNormKind
                         , ItemBought =. itemBought