summaryrefslogtreecommitdiff
path: root/Foundation.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Foundation.hs')
-rw-r--r--Foundation.hs5
1 files changed, 3 insertions, 2 deletions
diff --git a/Foundation.hs b/Foundation.hs
index 27082fc..8f45202 100644
--- a/Foundation.hs
+++ b/Foundation.hs
@@ -80,9 +80,10 @@ instance Yesod App where
80 80
81 -- Define the menu items of the header. 81 -- Define the menu items of the header.
82 let menuItems = 82 let menuItems =
83 [ MenuItem "Inventory" InventoryListingR 83 [ MenuItem "List" InventoryListR
84 , MenuItem "Table" InventoryListingR
84 , MenuItem "Reference" ReferenceListingR 85 , MenuItem "Reference" ReferenceListingR
85 , MenuItem "List" ListR 86 , MenuItem "Shopping List" ListR
86 ] 87 ]
87 currentMenu = listToMaybe 88 currentMenu = listToMaybe
88 [ menuItemLabel 89 [ menuItemLabel