Skip to content

Commit

Permalink
stack exec -- yesod add-handler
Browse files Browse the repository at this point in the history
  • Loading branch information
3v0k4 committed Jul 1, 2019
1 parent d82ecf3 commit 354fac6
Show file tree
Hide file tree
Showing 4 changed files with 18 additions and 0 deletions.
1 change: 1 addition & 0 deletions config/routes
Expand Up @@ -12,3 +12,4 @@
/comments CommentR POST

/profile ProfileR GET
/landing LandingR GET
1 change: 1 addition & 0 deletions src/Application.hs
Expand Up @@ -44,6 +44,7 @@ import Handler.Common
import Handler.Home
import Handler.Comment
import Handler.Profile
import Handler.Landing

-- 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
Expand Down
6 changes: 6 additions & 0 deletions src/Handler/Landing.hs
@@ -0,0 +1,6 @@
module Handler.Landing where

import Import

getLandingR :: Handler Html
getLandingR = error "Not yet implemented: getLandingR"
10 changes: 10 additions & 0 deletions test/Handler/LandingSpec.hs
@@ -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.