From 752dcc5e1b04c507c67485c137b7ece2208e6f42 Mon Sep 17 00:00:00 2001
From: Ben Sima <ben@bsima.me>
Date: Thu, 5 Sep 2019 21:42:46 -0700
Subject: [ibb] implement first api route

---
 lore/Biz/Ibb/Core.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'lore/Biz/Ibb/Core.hs')

diff --git a/lore/Biz/Ibb/Core.hs b/lore/Biz/Ibb/Core.hs
index 9ffa966..5d8f805 100644
--- a/lore/Biz/Ibb/Core.hs
+++ b/lore/Biz/Ibb/Core.hs
@@ -49,7 +49,7 @@ instance ToJSON Book
 
 -- * app data types
 
-type Routes = Home
+type AppRoutes = Home
 
 type Home = View Action
 
@@ -82,7 +82,7 @@ notfound = div_ [] [ text "404" ]
 
 goHome :: URI
 goHome = linkURI $ safeLink
-  (Proxy :: Proxy Routes)
+  (Proxy :: Proxy AppRoutes)
   (Proxy :: Proxy Home)
 
 see :: Model -> View Action
-- 
cgit v1.2.3