Web.Informative

Documentation

type WikiHandler a = forall master. (YesodWikiAuth master, YesodPersist master, YesodPersistBackend master ~ SqlPersistT) => HandlerT Informative (HandlerT master IO) a

class (Yesod master, RenderMessage master FormMessage) => YesodWikiAuth master where

Methods

getAuthR :: HandlerT master IO (AuthRoute -> Route master)

getUserName :: HandlerT master IO Text

isLoggedIn :: HandlerT master IO Bool

wikiLayout :: WidgetT master IO () -> HandlerT master IO Html

data WikipageGeneric backend

Constructors

Wikipage

Fields

wikipageTitle :: !Text

wikipageSegment :: !Text

wikipageEditor :: !Text

wikipageTimestamp :: !UTCTime

Instances

PersistFieldSql (WikipageGeneric backend)

PersistEntity (WikipageGeneric backend)

PersistField (WikipageGeneric backend)

type Wikipage = WikipageGeneric SqlBackend

type WikipageId = KeyBackend SqlBackend Wikipage

data WikisectionGeneric backend

Constructors

Wikisection

Fields

wikisectionContent :: !Text

wikisectionFormat :: !TextFormat

wikisectionKind :: !TextKind

Instances

PersistFieldSql (WikisectionGeneric backend)

PersistEntity (WikisectionGeneric backend)

PersistField (WikisectionGeneric backend)

type Wikisection = WikisectionGeneric SqlBackend

type WikisectionId = KeyBackend SqlBackend Wikisection

data WikirelGeneric backend

Constructors

Wikirel

Fields

wikirelPage :: !(KeyBackend backend (WikipageGeneric backend))

wikirelSection :: !(KeyBackend backend (WikisectionGeneric backend))

wikirelIndex :: !Int

Instances

PersistFieldSql (WikirelGeneric backend)

PersistEntity (WikirelGeneric backend)

PersistField (WikirelGeneric backend)

type Wikirel = WikirelGeneric SqlBackend

type WikirelId = KeyBackend SqlBackend Wikirel

data WikisuggGeneric backend

Constructors

Wikisugg

Fields

wikisuggPage :: !Text

wikisuggSegment :: !Text

wikisuggIndex :: !Int

wikisuggCaption :: !Text

Instances

PersistFieldSql (WikisuggGeneric backend)

PersistEntity (WikisuggGeneric backend)

PersistField (WikisuggGeneric backend)

type Wikisugg = WikisuggGeneric SqlBackend

type WikisuggId = KeyBackend SqlBackend Wikisugg

migrateWiki :: forall m. (MonadBaseControl IO m, MonadIO m, MonadLogger m) => Migration (SqlPersistT m)

readFmt :: TextFormat -> ReaderOptions -> String -> Pandoc

convFmt :: TextFormat -> String -> Html

convSect :: TextKind -> TextFormat -> Text -> Either Html [[Html]]

convTable :: TextFormat -> Text -> Either Html [[Html]]

source :: TextFormat -> Text -> Int -> TextFormat

fmtNorm :: TextFormat -> TextFormat

fmtLang :: TextFormat -> Text

fmtLine :: TextFormat -> Int

toClassname :: Text -> [Char]

remCR :: [Char] -> [Char]

renderShowArticle :: YesodWikiAuth master => [Entity Wikisugg] -> Bool -> (AuthRoute -> Route master) -> (Route Informative -> Route master) -> AuthResult -> Maybe Html -> [(Int, (Int64, Either Html [[Html]], TextKind))] -> [(Int64, Text, UTCTime)] -> Text -> HandlerT Informative (HandlerT master IO) Html

renderEditArticle :: YesodWikiAuth master => [Entity Wikisugg] -> Bool -> (AuthRoute -> Route master) -> (Route Informative -> Route master) -> Route master -> Maybe Html -> Maybe (Either Html [[Html]]) -> TextKind -> PageContent (Route master) -> Text -> HandlerT Informative (HandlerT master IO) Html

getArticleIdR :: Int -> WikiHandler Html

getArticleR :: Text -> WikiHandler Html

data SectionData

Constructors

SectionData

Fields

sdKind :: TextKind

sdFormat :: TextFormat

sdLang :: Text

sdFirstLine :: Int

sdContent :: Textarea

editSectionForm :: RenderMessage master FormMessage => Maybe SectionData -> Html -> MForm (HandlerT master IO) (FormResult SectionData, WidgetT master IO ())

getEditR :: Int -> WikiHandler Html

getInsertR :: Int -> WikiHandler Html

getPrependR :: Int -> WikiHandler Html

getCreateR :: Text -> WikiHandler Html

postEditR :: Int -> WikiHandler Html

postInsertR :: Int -> WikiHandler Html

postPrependR :: Int -> WikiHandler Html

postCreateR :: Text -> WikiHandler Html

postDownR :: Int -> WikiHandler Html

postUpR :: Int -> WikiHandler Html

postDeleteR :: Int -> WikiHandler Html