From 7bc954b779a9bc4e1c5e60f2648101c62ed22e72 Mon Sep 17 00:00:00 2001
From: Gregor Kleen <gkleen@yggdrasil.li>
Date: Tue, 14 Mar 2017 18:33:42 +0100
Subject: Reference & list

---
 Handler/InventoryListing.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'Handler/InventoryListing.hs')

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
   selectRep $ do
     provideJson (stock :: [Entity Item])
     provideRep . defaultLayout $ inventoryListing InventoryState
-      { formState = Just InsertForm{..}
+      { invFormState = Just InsertForm{..}
       , ..
       }
 
-- 
cgit v1.2.3