diff options
author | Gregor Kleen <gkleen@yggdrasil.li> | 2017-03-14 18:33:42 +0100 |
---|---|---|
committer | Gregor Kleen <gkleen@yggdrasil.li> | 2017-03-14 18:33:42 +0100 |
commit | 7bc954b779a9bc4e1c5e60f2648101c62ed22e72 (patch) | |
tree | b30851324772c14550c0444b7e79e36256f67900 /Handler/InventoryListing.hs | |
parent | 53fcf55c02f9335518c28d26429913258fc28f87 (diff) | |
download | bar-7bc954b779a9bc4e1c5e60f2648101c62ed22e72.tar bar-7bc954b779a9bc4e1c5e60f2648101c62ed22e72.tar.gz bar-7bc954b779a9bc4e1c5e60f2648101c62ed22e72.tar.bz2 bar-7bc954b779a9bc4e1c5e60f2648101c62ed22e72.tar.xz bar-7bc954b779a9bc4e1c5e60f2648101c62ed22e72.zip |
Reference & list
Diffstat (limited to 'Handler/InventoryListing.hs')
-rw-r--r-- | Handler/InventoryListing.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Handler/InventoryListing.hs b/Handler/InventoryListing.hs index e3c062e..12f36ba 100644 --- a/Handler/InventoryListing.hs +++ b/Handler/InventoryListing.hs | |||
@@ -18,7 +18,7 @@ postInventoryListingR = do | |||
18 | selectRep $ do | 18 | selectRep $ do |
19 | provideJson (stock :: [Entity Item]) | 19 | provideJson (stock :: [Entity Item]) |
20 | provideRep . defaultLayout $ inventoryListing InventoryState | 20 | provideRep . defaultLayout $ inventoryListing InventoryState |
21 | { formState = Just InsertForm{..} | 21 | { invFormState = Just InsertForm{..} |
22 | , .. | 22 | , .. |
23 | } | 23 | } |
24 | 24 | ||