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

fixed bug in inventory json backup

Browse source
This commit is contained in:
nek0 2015-10-12 17:19:51 +02:00
parent 34a5b61993
commit 8563f8a738
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/Summary.hs
View file

@ -56,7 +56,7 @@ data BevStore = BevStore
} }
instance ToJSON BevStore where instance ToJSON BevStore where
toJSON (BevStore ident price amount alertAmount maxAmount perCrate ml artNr ppc) = toJSON (BevStore ident price amount maxAmount perCrate alertAmount ml artNr ppc) =
object object
[ "name" .= ident [ "name" .= ident
, "price" .= price , "price" .= price