fixed bug in inventory json backup
This commit is contained in:
parent
34a5b61993
commit
8563f8a738
1 changed files with 1 additions and 1 deletions
|
@ -56,7 +56,7 @@ data BevStore = BevStore
|
|||
}
|
||||
|
||||
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
|
||||
[ "name" .= ident
|
||||
, "price" .= price
|
||||
|
|
Loading…
Reference in a new issue