Merge remote-tracking branch 'mdorman/yesod-core-fix'
This commit is contained in:
commit
966934d143
1 changed files with 2 additions and 2 deletions
|
@ -36,8 +36,6 @@ publicFiles "static"
|
|||
staticRoutes :: Static
|
||||
staticRoutes = $(embed "static")
|
||||
|
||||
mkYesodData "WebApp" $(parseRoutesFile "Assistant/WebApp/routes")
|
||||
|
||||
data WebApp = WebApp
|
||||
{ assistantData :: AssistantData
|
||||
, authToken :: AuthToken
|
||||
|
@ -49,6 +47,8 @@ data WebApp = WebApp
|
|||
, listenHost ::Maybe HostName
|
||||
}
|
||||
|
||||
mkYesodData "WebApp" $(parseRoutesFile "Assistant/WebApp/routes")
|
||||
|
||||
instance Yesod WebApp where
|
||||
{- Require an auth token be set when accessing any (non-static) route -}
|
||||
isAuthorized _ _ = checkAuthToken authToken
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue