Skip to content
Permalink
Browse files

stack exec -- yesod add-handler

  • Loading branch information...
3v0k4 committed Jul 1, 2019
1 parent d82ecf3 commit 354fac670be4b9869b171a0fdd7d15063d094fdb
Showing with 18 additions and 0 deletions.
  1. +1 −0 config/routes
  2. +1 −0 src/Application.hs
  3. +6 −0 src/Handler/Landing.hs
  4. +10 −0 test/Handler/LandingSpec.hs
@@ -12,3 +12,4 @@
/comments CommentR POST /comments CommentR POST


/profile ProfileR GET /profile ProfileR GET
/landing LandingR GET
@@ -44,6 +44,7 @@ import Handler.Common
import Handler.Home import Handler.Home
import Handler.Comment import Handler.Comment
import Handler.Profile import Handler.Profile
import Handler.Landing


-- This line actually creates our YesodDispatch instance. It is the second half -- This line actually creates our YesodDispatch instance. It is the second half
-- of the call to mkYesodData which occurs in Foundation.hs. Please see the -- of the call to mkYesodData which occurs in Foundation.hs. Please see the
@@ -0,0 +1,6 @@
module Handler.Landing where

import Import

getLandingR :: Handler Html
getLandingR = error "Not yet implemented: getLandingR"
@@ -0,0 +1,10 @@
module Handler.LandingSpec (spec) where

import TestImport

spec :: Spec
spec = withApp $ do

describe "getLandingR" $ do
error "Spec not implemented: getLandingR"

0 comments on commit 354fac6

Please sign in to comment.
You can’t perform that action at this time.