Safe Haskell	None
Language	Haskell2010

Yesod.GitRepo

Synopsis

data GitRepo a
grRefresh :: GitRepo a -> IO ()
grContent :: GitRepo a -> IO a
gitRepo :: Text -> Text -> (FilePath -> IO a) -> IO (GitRepo a)
gitRepoDev :: FilePath -> (FilePath -> IO a) -> IO (GitRepo a)
data family Route a

Documentation

data GitRepo a Source #

A combination of Yesod subsite to be used for creating a refresh route, as well as action to extract the current value of the content and force a refresh.

Since 0.1.0

Instances

Instances details

Read (Route (GitRepo a)) Source #

Instance details

Defined in Yesod.GitRepo

Methods

readsPrec :: Int -> ReadS (Route (GitRepo a)) #

readList :: ReadS [Route (GitRepo a)] #

readPrec :: ReadPrec (Route (GitRepo a)) #

readListPrec :: ReadPrec [Route (GitRepo a)] #

Show (Route (GitRepo a)) Source #

Instance details

Defined in Yesod.GitRepo

Methods

showsPrec :: Int -> Route (GitRepo a) -> ShowS #

show :: Route (GitRepo a) -> String #

showList :: [Route (GitRepo a)] -> ShowS #

Eq (Route (GitRepo a)) Source #

Instance details

Defined in Yesod.GitRepo

Methods

(==) :: Route (GitRepo a) -> Route (GitRepo a) -> Bool #

(/=) :: Route (GitRepo a) -> Route (GitRepo a) -> Bool #

ParseRoute (GitRepo a) Source #

Instance details

Defined in Yesod.GitRepo

Methods

parseRoute :: ([Text], [(Text, Text)]) -> Maybe (Route (GitRepo a)) #

RenderRoute (GitRepo a) Source #

Instance details

Defined in Yesod.GitRepo

Associated Types

data Route (GitRepo a)
Instance details Defined in Yesod.GitRepo data Route (GitRepo a) = GitRepoRoute

Methods

renderRoute :: Route (GitRepo a) -> ([Text], [(Text, Text)]) #

YesodSubDispatch (GitRepo a) site Source #

Instance details

Defined in Yesod.GitRepo

Methods

yesodSubDispatch :: YesodSubRunnerEnv (GitRepo a) site -> Application #

data Route (GitRepo a) Source #

Instance details

Defined in Yesod.GitRepo

data Route (GitRepo a) = GitRepoRoute

grRefresh :: GitRepo a -> IO () Source #

Force a refresh of the content. Usually this is done automatically via a POST request to the subsite route.

Since 0.1.0

grContent :: GitRepo a -> IO a Source #

Get the current value of the content.

Since 0.1.0

gitRepo Source #

Arguments

:: Text	URL
-> Text	branch name
-> (FilePath -> IO a)	what to do on clone/refresh
-> IO (GitRepo a)

Create a new GitRepo value that can be used as a refresh subsite, as well as to extract the current value of the content.

Note that if the initial clone or user action fails, this function will throw an exception. For subsequent refreshes, the exception will be stored as an impure exception for future grContent calls.

Since 0.1.0

gitRepoDev :: FilePath -> (FilePath -> IO a) -> IO (GitRepo a) Source #

Like gitRepo, but intended to be used in a dev environment. It just uses a hard-coded FilePath and reloads the contents on each request.

Since 0.1.1

data family Route a #

The type-safe URLs associated with a site argument.

Instances

Instances details

RedirectUrl master (Route master)
Instance details Defined in Yesod.Core.Handler Methods toTextUrl :: (MonadHandler m, HandlerSite m ~ master) => Route master -> m Text #
(key ~ Text, val ~ Text) => RedirectUrl master (Route master, Map key val)
Instance details Defined in Yesod.Core.Handler Methods toTextUrl :: (MonadHandler m, HandlerSite m ~ master) => (Route master, Map key val) -> m Text #
(key ~ Text, val ~ Text) => RedirectUrl master (Route master, [(key, val)])
Instance details Defined in Yesod.Core.Handler Methods toTextUrl :: (MonadHandler m, HandlerSite m ~ master) => (Route master, [(key, val)]) -> m Text #
Read (Route LiteApp)
Instance details Defined in Yesod.Core.Internal.LiteApp Methods readsPrec :: Int -> ReadS (Route LiteApp) # readList :: ReadS [Route LiteApp] # readPrec :: ReadPrec (Route LiteApp) # readListPrec :: ReadPrec [Route LiteApp] #
Read (Route WaiSubsite)
Instance details Defined in Yesod.Core.Types Methods readsPrec :: Int -> ReadS (Route WaiSubsite) # readList :: ReadS [Route WaiSubsite] # readPrec :: ReadPrec (Route WaiSubsite) # readListPrec :: ReadPrec [Route WaiSubsite] #
Read (Route WaiSubsiteWithAuth)
Instance details Defined in Yesod.Core.Types Methods readsPrec :: Int -> ReadS (Route WaiSubsiteWithAuth) # readList :: ReadS [Route WaiSubsiteWithAuth] # readPrec :: ReadPrec (Route WaiSubsiteWithAuth) # readListPrec :: ReadPrec [Route WaiSubsiteWithAuth] #
Read (Route (GitRepo a)) Source #
Instance details Defined in Yesod.GitRepo Methods readsPrec :: Int -> ReadS (Route (GitRepo a)) # readList :: ReadS [Route (GitRepo a)] # readPrec :: ReadPrec (Route (GitRepo a)) # readListPrec :: ReadPrec [Route (GitRepo a)] #
Show (Route LiteApp)
Instance details Defined in Yesod.Core.Internal.LiteApp Methods showsPrec :: Int -> Route LiteApp -> ShowS # show :: Route LiteApp -> String # showList :: [Route LiteApp] -> ShowS #
Show (Route WaiSubsite)
Instance details Defined in Yesod.Core.Types Methods showsPrec :: Int -> Route WaiSubsite -> ShowS # show :: Route WaiSubsite -> String # showList :: [Route WaiSubsite] -> ShowS #
Show (Route WaiSubsiteWithAuth)
Instance details Defined in Yesod.Core.Types Methods showsPrec :: Int -> Route WaiSubsiteWithAuth -> ShowS # show :: Route WaiSubsiteWithAuth -> String # showList :: [Route WaiSubsiteWithAuth] -> ShowS #
Show (Route (GitRepo a)) Source #
Instance details Defined in Yesod.GitRepo Methods showsPrec :: Int -> Route (GitRepo a) -> ShowS # show :: Route (GitRepo a) -> String # showList :: [Route (GitRepo a)] -> ShowS #
Eq (Route LiteApp)
Instance details Defined in Yesod.Core.Internal.LiteApp Methods (==) :: Route LiteApp -> Route LiteApp -> Bool # (/=) :: Route LiteApp -> Route LiteApp -> Bool #
Eq (Route WaiSubsite)
Instance details Defined in Yesod.Core.Types Methods (==) :: Route WaiSubsite -> Route WaiSubsite -> Bool # (/=) :: Route WaiSubsite -> Route WaiSubsite -> Bool #
Eq (Route WaiSubsiteWithAuth)
Instance details Defined in Yesod.Core.Types Methods (==) :: Route WaiSubsiteWithAuth -> Route WaiSubsiteWithAuth -> Bool # (/=) :: Route WaiSubsiteWithAuth -> Route WaiSubsiteWithAuth -> Bool #
Eq (Route (GitRepo a)) Source #
Instance details Defined in Yesod.GitRepo Methods (==) :: Route (GitRepo a) -> Route (GitRepo a) -> Bool # (/=) :: Route (GitRepo a) -> Route (GitRepo a) -> Bool #
Ord (Route LiteApp)
Instance details Defined in Yesod.Core.Internal.LiteApp Methods compare :: Route LiteApp -> Route LiteApp -> Ordering # (<) :: Route LiteApp -> Route LiteApp -> Bool # (<=) :: Route LiteApp -> Route LiteApp -> Bool # (>) :: Route LiteApp -> Route LiteApp -> Bool # (>=) :: Route LiteApp -> Route LiteApp -> Bool # max :: Route LiteApp -> Route LiteApp -> Route LiteApp # min :: Route LiteApp -> Route LiteApp -> Route LiteApp #
Ord (Route WaiSubsite)
Instance details Defined in Yesod.Core.Types Methods compare :: Route WaiSubsite -> Route WaiSubsite -> Ordering # (<) :: Route WaiSubsite -> Route WaiSubsite -> Bool # (<=) :: Route WaiSubsite -> Route WaiSubsite -> Bool # (>) :: Route WaiSubsite -> Route WaiSubsite -> Bool # (>=) :: Route WaiSubsite -> Route WaiSubsite -> Bool # max :: Route WaiSubsite -> Route WaiSubsite -> Route WaiSubsite # min :: Route WaiSubsite -> Route WaiSubsite -> Route WaiSubsite #
Ord (Route WaiSubsiteWithAuth)
Instance details Defined in Yesod.Core.Types Methods compare :: Route WaiSubsiteWithAuth -> Route WaiSubsiteWithAuth -> Ordering # (<) :: Route WaiSubsiteWithAuth -> Route WaiSubsiteWithAuth -> Bool # (<=) :: Route WaiSubsiteWithAuth -> Route WaiSubsiteWithAuth -> Bool # (>) :: Route WaiSubsiteWithAuth -> Route WaiSubsiteWithAuth -> Bool # (>=) :: Route WaiSubsiteWithAuth -> Route WaiSubsiteWithAuth -> Bool # max :: Route WaiSubsiteWithAuth -> Route WaiSubsiteWithAuth -> Route WaiSubsiteWithAuth # min :: Route WaiSubsiteWithAuth -> Route WaiSubsiteWithAuth -> Route WaiSubsiteWithAuth #
data Route LiteApp
Instance details Defined in Yesod.Core.Internal.LiteApp data Route LiteApp = LiteAppRoute [Text]
data Route WaiSubsite
Instance details Defined in Yesod.Core.Types data Route WaiSubsite = WaiSubsiteRoute [Text] [(Text, Text)]
data Route WaiSubsiteWithAuth
Instance details Defined in Yesod.Core.Types data Route WaiSubsiteWithAuth = WaiSubsiteWithAuthRoute [Text] [(Text, Text)]
data Route (GitRepo a) Source #
Instance details Defined in Yesod.GitRepo data Route (GitRepo a) = GitRepoRoute