Safe Haskell | Safe |
---|---|
Language | Haskell2010 |
Cheapskate.Types
Synopsis
- data Doc = Doc Options Blocks
- data Block
- data CodeAttr = CodeAttr {}
- data ListType
- = Bullet Char
- | Numbered NumWrapper Int
- data NumWrapper
- data HtmlTagType
- = Opening Text
- | Closing Text
- | SelfClosing Text
- type Blocks = Seq Block
- data Inline
- type Inlines = Seq Inline
- type ReferenceMap = Map Text (Text, Text)
- data Options = Options {
- sanitize :: Bool
- allowRawHtml :: Bool
- preserveHardBreaks :: Bool
- debug :: Bool
Documentation
Structured representation of a document. The Options
affect
how the document is rendered by toHtml
.
Instances
Data Doc Source # | |
Defined in Cheapskate.Types Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> Doc -> c Doc gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c Doc dataTypeOf :: Doc -> DataType dataCast1 :: Typeable t => (forall d. Data d => c (t d)) -> Maybe (c Doc) dataCast2 :: Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c Doc) gmapT :: (forall b. Data b => b -> b) -> Doc -> Doc gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> Doc -> r gmapQr :: forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> Doc -> r gmapQ :: (forall d. Data d => d -> u) -> Doc -> [u] gmapQi :: Int -> (forall d. Data d => d -> u) -> Doc -> u gmapM :: Monad m => (forall d. Data d => d -> m d) -> Doc -> m Doc gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> Doc -> m Doc gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> Doc -> m Doc | |
Show Doc Source # | |
Generic Doc Source # | |
NFData Doc Source # | |
Defined in Cheapskate.Types | |
ToMarkup Doc | |
Defined in Cheapskate | |
type Rep Doc Source # | |
Defined in Cheapskate.Types type Rep Doc = D1 ('MetaData "Doc" "Cheapskate.Types" "cheapskate-0.1.1.2-LfeppKfxdSsJuwha9hl93O" 'False) (C1 ('MetaCons "Doc" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Options) :*: S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Blocks))) |
Block-level elements.
Constructors
Para Inlines | |
Header Int Inlines | |
Blockquote Blocks | |
List Bool ListType [Blocks] | |
CodeBlock CodeAttr Text | |
HtmlBlock Text | |
HRule |
Instances
Data Block Source # | |
Defined in Cheapskate.Types Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> Block -> c Block gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c Block dataTypeOf :: Block -> DataType dataCast1 :: Typeable t => (forall d. Data d => c (t d)) -> Maybe (c Block) dataCast2 :: Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c Block) gmapT :: (forall b. Data b => b -> b) -> Block -> Block gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> Block -> r gmapQr :: forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> Block -> r gmapQ :: (forall d. Data d => d -> u) -> Block -> [u] gmapQi :: Int -> (forall d. Data d => d -> u) -> Block -> u gmapM :: Monad m => (forall d. Data d => d -> m d) -> Block -> m Block gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> Block -> m Block gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> Block -> m Block | |
Show Block Source # | |
Generic Block Source # | |
NFData Block Source # | |
Defined in Cheapskate.Types | |
type Rep Block Source # | |
Defined in Cheapskate.Types type Rep Block = D1 ('MetaData "Block" "Cheapskate.Types" "cheapskate-0.1.1.2-LfeppKfxdSsJuwha9hl93O" 'False) ((C1 ('MetaCons "Para" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Inlines)) :+: (C1 ('MetaCons "Header" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int) :*: S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Inlines)) :+: C1 ('MetaCons "Blockquote" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Blocks)))) :+: ((C1 ('MetaCons "List" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Bool) :*: (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 ListType) :*: S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [Blocks]))) :+: C1 ('MetaCons "CodeBlock" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 CodeAttr) :*: S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text))) :+: (C1 ('MetaCons "HtmlBlock" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :+: C1 ('MetaCons "HRule" 'PrefixI 'False) (U1 :: Type -> Type)))) |
Attributes for fenced code blocks. codeLang
is the
first word of the attribute line, codeInfo
is the rest.
Instances
Data CodeAttr Source # | |
Defined in Cheapskate.Types Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> CodeAttr -> c CodeAttr gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c CodeAttr toConstr :: CodeAttr -> Constr dataTypeOf :: CodeAttr -> DataType dataCast1 :: Typeable t => (forall d. Data d => c (t d)) -> Maybe (c CodeAttr) dataCast2 :: Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c CodeAttr) gmapT :: (forall b. Data b => b -> b) -> CodeAttr -> CodeAttr gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> CodeAttr -> r gmapQr :: forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> CodeAttr -> r gmapQ :: (forall d. Data d => d -> u) -> CodeAttr -> [u] gmapQi :: Int -> (forall d. Data d => d -> u) -> CodeAttr -> u gmapM :: Monad m => (forall d. Data d => d -> m d) -> CodeAttr -> m CodeAttr gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> CodeAttr -> m CodeAttr gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> CodeAttr -> m CodeAttr | |
Show CodeAttr Source # | |
Generic CodeAttr Source # | |
NFData CodeAttr Source # | |
Defined in Cheapskate.Types | |
type Rep CodeAttr Source # | |
Defined in Cheapskate.Types type Rep CodeAttr = D1 ('MetaData "CodeAttr" "Cheapskate.Types" "cheapskate-0.1.1.2-LfeppKfxdSsJuwha9hl93O" 'False) (C1 ('MetaCons "CodeAttr" 'PrefixI 'True) (S1 ('MetaSel ('Just "codeLang") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "codeInfo") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text))) |
Constructors
Bullet Char | |
Numbered NumWrapper Int |
Instances
Eq ListType Source # | |
Data ListType Source # | |
Defined in Cheapskate.Types Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> ListType -> c ListType gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c ListType toConstr :: ListType -> Constr dataTypeOf :: ListType -> DataType dataCast1 :: Typeable t => (forall d. Data d => c (t d)) -> Maybe (c ListType) dataCast2 :: Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c ListType) gmapT :: (forall b. Data b => b -> b) -> ListType -> ListType gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> ListType -> r gmapQr :: forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> ListType -> r gmapQ :: (forall d. Data d => d -> u) -> ListType -> [u] gmapQi :: Int -> (forall d. Data d => d -> u) -> ListType -> u gmapM :: Monad m => (forall d. Data d => d -> m d) -> ListType -> m ListType gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> ListType -> m ListType gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> ListType -> m ListType | |
Show ListType Source # | |
Generic ListType Source # | |
NFData ListType Source # | |
Defined in Cheapskate.Types | |
type Rep ListType Source # | |
Defined in Cheapskate.Types type Rep ListType = D1 ('MetaData "ListType" "Cheapskate.Types" "cheapskate-0.1.1.2-LfeppKfxdSsJuwha9hl93O" 'False) (C1 ('MetaCons "Bullet" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Char)) :+: C1 ('MetaCons "Numbered" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 NumWrapper) :*: S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int))) |
data NumWrapper Source #
Constructors
PeriodFollowing | |
ParenFollowing |
Instances
Eq NumWrapper Source # | |
Defined in Cheapskate.Types | |
Data NumWrapper Source # | |
Defined in Cheapskate.Types Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> NumWrapper -> c NumWrapper gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c NumWrapper toConstr :: NumWrapper -> Constr dataTypeOf :: NumWrapper -> DataType dataCast1 :: Typeable t => (forall d. Data d => c (t d)) -> Maybe (c NumWrapper) dataCast2 :: Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c NumWrapper) gmapT :: (forall b. Data b => b -> b) -> NumWrapper -> NumWrapper gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> NumWrapper -> r gmapQr :: forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> NumWrapper -> r gmapQ :: (forall d. Data d => d -> u) -> NumWrapper -> [u] gmapQi :: Int -> (forall d. Data d => d -> u) -> NumWrapper -> u gmapM :: Monad m => (forall d. Data d => d -> m d) -> NumWrapper -> m NumWrapper gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> NumWrapper -> m NumWrapper gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> NumWrapper -> m NumWrapper | |
Show NumWrapper Source # | |
Defined in Cheapskate.Types Methods showsPrec :: Int -> NumWrapper -> ShowS show :: NumWrapper -> String showList :: [NumWrapper] -> ShowS | |
Generic NumWrapper Source # | |
Defined in Cheapskate.Types Associated Types type Rep NumWrapper :: Type -> Type | |
NFData NumWrapper Source # | |
Defined in Cheapskate.Types Methods rnf :: NumWrapper -> () | |
type Rep NumWrapper Source # | |
Defined in Cheapskate.Types type Rep NumWrapper = D1 ('MetaData "NumWrapper" "Cheapskate.Types" "cheapskate-0.1.1.2-LfeppKfxdSsJuwha9hl93O" 'False) (C1 ('MetaCons "PeriodFollowing" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "ParenFollowing" 'PrefixI 'False) (U1 :: Type -> Type)) |
data HtmlTagType Source #
Simple representation of HTML tag.
Constructors
Opening Text | |
Closing Text | |
SelfClosing Text |
Instances
Data HtmlTagType Source # | |
Defined in Cheapskate.Types Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> HtmlTagType -> c HtmlTagType gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c HtmlTagType toConstr :: HtmlTagType -> Constr dataTypeOf :: HtmlTagType -> DataType dataCast1 :: Typeable t => (forall d. Data d => c (t d)) -> Maybe (c HtmlTagType) dataCast2 :: Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c HtmlTagType) gmapT :: (forall b. Data b => b -> b) -> HtmlTagType -> HtmlTagType gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> HtmlTagType -> r gmapQr :: forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> HtmlTagType -> r gmapQ :: (forall d. Data d => d -> u) -> HtmlTagType -> [u] gmapQi :: Int -> (forall d. Data d => d -> u) -> HtmlTagType -> u gmapM :: Monad m => (forall d. Data d => d -> m d) -> HtmlTagType -> m HtmlTagType gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> HtmlTagType -> m HtmlTagType gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> HtmlTagType -> m HtmlTagType | |
Show HtmlTagType Source # | |
Defined in Cheapskate.Types Methods showsPrec :: Int -> HtmlTagType -> ShowS show :: HtmlTagType -> String showList :: [HtmlTagType] -> ShowS | |
Generic HtmlTagType Source # | |
Defined in Cheapskate.Types Associated Types type Rep HtmlTagType :: Type -> Type | |
NFData HtmlTagType Source # | |
Defined in Cheapskate.Types Methods rnf :: HtmlTagType -> () | |
type Rep HtmlTagType Source # | |
Defined in Cheapskate.Types type Rep HtmlTagType = D1 ('MetaData "HtmlTagType" "Cheapskate.Types" "cheapskate-0.1.1.2-LfeppKfxdSsJuwha9hl93O" 'False) (C1 ('MetaCons "Opening" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :+: (C1 ('MetaCons "Closing" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :+: C1 ('MetaCons "SelfClosing" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)))) |
Inline elements.
Constructors
Str Text | |
Space | |
SoftBreak | |
LineBreak | |
Emph Inlines | |
Strong Inlines | |
Code Text | |
Link Inlines Text Text | |
Image Inlines Text Text | |
Entity Text | |
RawHtml Text |
Instances
Data Inline Source # | |
Defined in Cheapskate.Types Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> Inline -> c Inline gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c Inline dataTypeOf :: Inline -> DataType dataCast1 :: Typeable t => (forall d. Data d => c (t d)) -> Maybe (c Inline) dataCast2 :: Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c Inline) gmapT :: (forall b. Data b => b -> b) -> Inline -> Inline gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> Inline -> r gmapQr :: forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> Inline -> r gmapQ :: (forall d. Data d => d -> u) -> Inline -> [u] gmapQi :: Int -> (forall d. Data d => d -> u) -> Inline -> u gmapM :: Monad m => (forall d. Data d => d -> m d) -> Inline -> m Inline gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> Inline -> m Inline gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> Inline -> m Inline | |
Show Inline Source # | |
Generic Inline Source # | |
NFData Inline Source # | |
Defined in Cheapskate.Types | |
type Rep Inline Source # | |
Defined in Cheapskate.Types type Rep Inline = D1 ('MetaData "Inline" "Cheapskate.Types" "cheapskate-0.1.1.2-LfeppKfxdSsJuwha9hl93O" 'False) (((C1 ('MetaCons "Str" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :+: C1 ('MetaCons "Space" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "SoftBreak" 'PrefixI 'False) (U1 :: Type -> Type) :+: (C1 ('MetaCons "LineBreak" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Emph" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Inlines))))) :+: ((C1 ('MetaCons "Strong" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Inlines)) :+: (C1 ('MetaCons "Code" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :+: C1 ('MetaCons "Link" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Inlines) :*: (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text))))) :+: (C1 ('MetaCons "Image" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Inlines) :*: (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text))) :+: (C1 ('MetaCons "Entity" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :+: C1 ('MetaCons "RawHtml" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)))))) |
type ReferenceMap = Map Text (Text, Text) Source #
Rendering and parsing options.
Constructors
Options | |
Fields
|
Instances
Data Options Source # | |
Defined in Cheapskate.Types Methods gfoldl :: (forall d b. Data d => c (d -> b) -> d -> c b) -> (forall g. g -> c g) -> Options -> c Options gunfold :: (forall b r. Data b => c (b -> r) -> c r) -> (forall r. r -> c r) -> Constr -> c Options dataTypeOf :: Options -> DataType dataCast1 :: Typeable t => (forall d. Data d => c (t d)) -> Maybe (c Options) dataCast2 :: Typeable t => (forall d e. (Data d, Data e) => c (t d e)) -> Maybe (c Options) gmapT :: (forall b. Data b => b -> b) -> Options -> Options gmapQl :: (r -> r' -> r) -> r -> (forall d. Data d => d -> r') -> Options -> r gmapQr :: forall r r'. (r' -> r -> r) -> r -> (forall d. Data d => d -> r') -> Options -> r gmapQ :: (forall d. Data d => d -> u) -> Options -> [u] gmapQi :: Int -> (forall d. Data d => d -> u) -> Options -> u gmapM :: Monad m => (forall d. Data d => d -> m d) -> Options -> m Options gmapMp :: MonadPlus m => (forall d. Data d => d -> m d) -> Options -> m Options gmapMo :: MonadPlus m => (forall d. Data d => d -> m d) -> Options -> m Options | |
Show Options Source # | |
Generic Options Source # | |
NFData Options Source # | |
Defined in Cheapskate.Types | |
Default Options Source # | |
Defined in Cheapskate.Types | |
type Rep Options Source # | |
Defined in Cheapskate.Types type Rep Options = D1 ('MetaData "Options" "Cheapskate.Types" "cheapskate-0.1.1.2-LfeppKfxdSsJuwha9hl93O" 'False) (C1 ('MetaCons "Options" 'PrefixI 'True) ((S1 ('MetaSel ('Just "sanitize") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Bool) :*: S1 ('MetaSel ('Just "allowRawHtml") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Bool)) :*: (S1 ('MetaSel ('Just "preserveHardBreaks") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Bool) :*: S1 ('MetaSel ('Just "debug") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Bool)))) |