From 47c2a4d6b68c54eed5f7b45671b1ccaf8c0db200 Mon Sep 17 00:00:00 2001
From: Joris
Date: Mon, 20 Jan 2020 19:47:23 +0100
Subject: Show payment stats

---
 client/src/View/Header.hs | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'client/src/View/Header.hs')

diff --git a/client/src/View/Header.hs b/client/src/View/Header.hs
index f91c408..ff9f40a 100644
--- a/client/src/View/Header.hs
+++ b/client/src/View/Header.hs
@@ -67,6 +67,11 @@ links route = do
     (R.ffor route (attrs CategoryRoute))
     (Msg.get Msg.Category_Title)
 
+  Link.view
+    "/statistics"
+    (R.ffor route (attrs StatisticsRoute))
+    (Msg.get Msg.Statistics_Title)
+
   where
     attrs linkRoute currentRoute =
       M.singleton "class" $
-- 
cgit v1.2.3