Web.Exhentai.Parsing.MPV

Documentation

allScripts :: Traversal' Document Text

data MpvImage

Constructors

MpvImage

Fields

• name :: Text
• key :: Text
• thumbnail :: Text

Instances

Eq MpvImage

Defined in Web.Exhentai.Parsing.MPV

Methods

(==) :: MpvImage -> MpvImage -> Bool

(/=) :: MpvImage -> MpvImage -> Bool

Show MpvImage

Defined in Web.Exhentai.Parsing.MPV

Methods

showsPrec :: Int -> MpvImage -> ShowS

show :: MpvImage -> String

showList :: [MpvImage] -> ShowS

Generic MpvImage

Defined in Web.Exhentai.Parsing.MPV

Associated Types

type Rep MpvImage :: Type -> Type

Methods

from :: MpvImage -> Rep MpvImage x

to :: Rep MpvImage x -> MpvImage

FromJSON MpvImage

Defined in Web.Exhentai.Parsing.MPV

Methods

parseJSON :: Value -> Parser MpvImage

parseJSONList :: Value -> Parser [MpvImage]

type Rep MpvImage

Defined in Web.Exhentai.Parsing.MPV

type Rep MpvImage = D1 ('MetaData "MpvImage" "Web.Exhentai.Parsing.MPV" "exh-0.1.0-inplace" 'False) (C1 ('MetaCons "MpvImage" 'PrefixI 'True) (S1 ('MetaSel ('Just "name") 'SourceUnpack 'NoSourceStrictness 'DecidedStrict) (Rec0 Text) :*: (S1 ('MetaSel ('Just "key") 'SourceUnpack 'NoSourceStrictness 'DecidedStrict) (Rec0 Text) :*: S1 ('MetaSel ('Just "thumbnail") 'SourceUnpack 'NoSourceStrictness 'DecidedStrict) (Rec0 Text))))

data Vars

All the variables defined in the scripts that came with the MPV

Constructors

Vars

Fields

• gid :: Int
• mpvkey :: Text
• apiUrl :: Text
• pageCount :: Int
• imageList :: [MpvImage]

Instances

Eq Vars

Defined in Web.Exhentai.Parsing.MPV

Methods

(==) :: Vars -> Vars -> Bool

(/=) :: Vars -> Vars -> Bool

Show Vars

Defined in Web.Exhentai.Parsing.MPV

Methods

showsPrec :: Int -> Vars -> ShowS

show :: Vars -> String

showList :: [Vars] -> ShowS

Generic Vars

Defined in Web.Exhentai.Parsing.MPV

Associated Types

type Rep Vars :: Type -> Type

Methods

from :: Vars -> Rep Vars x

to :: Rep Vars x -> Vars

type Rep Vars

Defined in Web.Exhentai.Parsing.MPV

type Rep Vars = D1 ('MetaData "Vars" "Web.Exhentai.Parsing.MPV" "exh-0.1.0-inplace" 'False) (C1 ('MetaCons "Vars" 'PrefixI 'True) ((S1 ('MetaSel ('Just "gid") 'SourceUnpack 'NoSourceStrictness 'DecidedStrict) (Rec0 Int) :*: S1 ('MetaSel ('Just "mpvkey") 'SourceUnpack 'NoSourceStrictness 'DecidedStrict) (Rec0 Text)) :*: (S1 ('MetaSel ('Just "apiUrl") 'SourceUnpack 'NoSourceStrictness 'DecidedStrict) (Rec0 Text) :*: (S1 ('MetaSel ('Just "pageCount") 'SourceUnpack 'NoSourceStrictness 'DecidedStrict) (Rec0 Int) :*: S1 ('MetaSel ('Just "imageList") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedStrict) (Rec0 [MpvImage])))))

extractEnv :: Text -> IO (Result Vars)