YesodPushAppRoutes.hs

{-# LANGUAGE OverloadedStrings, TypeFamilies, TemplateHaskell, QuasiQuotes #-}

module Network.PushNotify.General.YesodPushAppRoutes where

import Yesod
import Network.PushNotify.General.Types
import Control.Concurrent
import Data.Text

-- Yesod subsite to be used for the registration and reception of messages from devices.
mkYesodSubData "PushManager" [parseRoutes|
/register SubRegisterR POST
/messages SubMessagesR POST
|]