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

whoops. wrong function name.

Browse source
This commit is contained in:
nek0 2016-01-30 23:40:37 +01:00
parent 400775e925
commit fd532b592f
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

@ -49,7 +49,7 @@ postUpstockR bId = do
FormSuccess c -> FormSuccess c ->
if upstockSingles c > 0 && upstockCrates c > 0 if upstockSingles c > 0 && upstockCrates c > 0
then do then do
let total = upstockSingles c + (upstockCrates c * fromMaybe 0 $ perCrate bev) let total = upstockSingles c + (upstockCrates c * (fromMaybe 0 $ beveragePerCrate bev))
runDB $ update bId [BeverageAmount +=. total] runDB $ update bId [BeverageAmount +=. total]
setMessageI MsgStockedUp setMessageI MsgStockedUp
redirect RestockR redirect RestockR