diff --git a/Handler/Restock.hs b/Handler/Restock.hs index b2a63c0..2987028 100644 --- a/Handler/Restock.hs +++ b/Handler/Restock.hs @@ -64,7 +64,7 @@ data UpstockAmount = UpstockAmount upstockForm :: AForm Handler UpstockAmount upstockForm = UpstockAmount - <$> areq amountField (bfs MsgAmountAdded) (Just 1) + <$> areq amountField (bfs MsgAmountAdded) (Just 0) <*> areq amountField (bfs MsgCrateAmountAdded) (Just 0) <* bootstrapSubmit (msgToBSSubmit MsgFillup)