nek0/yammat
1
0
Fork 0
Code Issues Pull requests Releases Wiki Activity

it is not usual to restock 1 item (bottle or whatever)

Browse source 
… so it is unhandy to have such a default (in the box). i do not want to do this editing (the value in box) almost every time.
This commit is contained in:
yater 2018-09-04 15:53:59 +02:00 committed by GitHub
parent 4e15f74245
commit 9f545d9854
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
Handler/Restock.hs
View file

@ -64,7 +64,7 @@ data UpstockAmount = UpstockAmount
upstockForm :: AForm Handler UpstockAmount upstockForm :: AForm Handler UpstockAmount
upstockForm = UpstockAmount upstockForm = UpstockAmount
<$> areq amountField (bfs MsgAmountAdded) (Just 1) <$> areq amountField (bfs MsgAmountAdded) (Just 0)
<*> areq amountField (bfs MsgCrateAmountAdded) (Just 0) <*> areq amountField (bfs MsgCrateAmountAdded) (Just 0)
<* bootstrapSubmit (msgToBSSubmit MsgFillup) <* bootstrapSubmit (msgToBSSubmit MsgFillup)