diff --git a/src/Application.hs b/src/Application.hs index d307ecd..d605aeb 100644 --- a/src/Application.hs +++ b/src/Application.hs @@ -54,6 +54,7 @@ mkYesod /auth AuthR Auth getAuth / HomeR GET /about AboutR GET +/recycling RecyclingR GET /blog BlogR GET /blog/rivers BlogTEMP_RIVERS GET /projects ProjectsR GET @@ -160,6 +161,9 @@ getAboutR = defaultLayout (setTitle "dfsek.com - About" >> $(whamletFile "pages/ getProjectsR :: Handler Html getProjectsR = defaultLayout (setTitle "dfsek.com - My Projects" >> $(whamletFile "pages/projects.hamlet")) +getRecyclingR :: Handler Html +getRecyclingR = defaultLayout (setTitle "dfsek.com - Electronics Recycling Services" >> $(whamletFile "pages/recycling.hamlet")) + getBlogR :: Handler Html getBlogR = defaultLayout (setTitle "dfsek.com - Blog" >> $(whamletFile "pages/blog.hamlet"))