13 lines
315 B
Haskell
13 lines
315 B
Haskell
{-# LANGUAGE QuasiQuotes, TypeFamilies, TemplateHaskell, MultiParamTypeClasses #-}
|
|
{-# LANGUAGE OverloadedStrings #-}
|
|
{-# LANGUAGE FlexibleInstances #-}
|
|
module YesodShakespeareTest.MediaData where
|
|
|
|
import Yesod.Core
|
|
|
|
data Y = Y
|
|
mkYesodData "Y" [parseRoutes|
|
|
/ RootR GET
|
|
/static StaticR !IGNORED GET !alsoIgnored
|
|
|]
|