Safe Haskell | None |
---|---|
Language | Haskell2010 |
BlazeMarkup is a markup combinator library. It provides a way to embed markup languages like HTML and SVG in Haskell in an efficient and convenient way, with a light-weight syntax.
To use the library, one needs to import a set of combinators. For example, you can use HTML 4 Strict from BlazeHtml package.
{-# LANGUAGE OverloadedStrings #-} import Prelude hiding (head, id, div) import Text.Blaze.Html4.Strict hiding (map) import Text.Blaze.Html4.Strict.Attributes hiding (title)
To render the page later on, you need a so called Renderer. The recommended renderer is an UTF-8 renderer which produces a lazy bytestring.
import Text.Blaze.Renderer.Utf8 (renderMarkup)
Now, you can describe pages using the imported combinators.
page1 :: Markup page1 = html $ do head $ do title "Introduction page." link ! rel "stylesheet" ! type_ "text/css" ! href "screen.css" body $ do div ! id "header" $ "Syntax" p "This is an example of BlazeMarkup syntax." ul $ mapM_ (li . toMarkup . show) [1, 2, 3]
The resulting HTML can now be extracted using:
renderMarkup page1
Synopsis
- type Markup e = MarkupM e ()
- data Tag
- data Attribute ev
- data AttributeValue
- dataAttribute :: Tag -> AttributeValue -> Attribute ev
- customAttribute :: Tag -> AttributeValue -> Attribute ev
- class ToMarkup a where
- unsafeByteString :: ByteString -> Markup ev
- unsafeLazyByteString :: ByteString -> Markup ev
- textTag :: Text -> Tag
- stringTag :: String -> Tag
- class ToValue a where
- unsafeByteStringValue :: ByteString -> AttributeValue
- unsafeLazyByteStringValue :: ByteString -> AttributeValue
- (!) :: Attributable h ev => h -> Attribute ev -> h
- (!?) :: Attributable h ev => h -> (Bool, Attribute ev) -> h
- contents :: MarkupM ev a -> MarkupM ev' b
Important types.
Type for an HTML tag. This can be seen as an internal string type used by BlazeMarkup.
data AttributeValue Source #
The type for the value part of an attribute.
Instances
IsString AttributeValue Source # | |
fromString :: String -> AttributeValue # | |
Semigroup AttributeValue Source # | |
(<>) :: AttributeValue -> AttributeValue -> AttributeValue # sconcat :: NonEmpty AttributeValue -> AttributeValue # stimes :: Integral b => b -> AttributeValue -> AttributeValue # | |
Monoid AttributeValue Source # | |
mappend :: AttributeValue -> AttributeValue -> AttributeValue # mconcat :: [AttributeValue] -> AttributeValue # | |
ToValue AttributeValue Source # | |
Creating attributes.
:: Tag | Name of the attribute. |
-> AttributeValue | Value for the attribute. |
-> Attribute ev | Resulting HTML attribute. |
From HTML 5 onwards, the user is able to specify custom data attributes.
An example:
<p data-foo="bar">Hello.</p>
We support this in BlazeMarkup using this funcion. The above fragment could be described using BlazeMarkup with:
p ! dataAttribute "foo" "bar" $ "Hello."
:: Tag | Name of the attribute |
-> AttributeValue | Value for the attribute |
-> Attribute ev | Resulting HTML attribtue |
Create a custom attribute. This is not specified in the HTML spec, but some JavaScript libraries rely on it.
An example:
<select dojoType="select">foo</select>
Can be produced using:
select ! customAttribute "dojoType" "select" $ "foo"
Converting values to Markup.
class ToMarkup a where Source #
Class allowing us to use a single function for Markup values
toMarkup :: a -> Markup ev Source #
Convert a value to Markup.
preEscapedToMarkup :: a -> Markup ev Source #
Convert a value to Markup without escaping
Instances
:: ByteString | Value to insert. |
-> Markup ev | Resulting HTML fragment. |
Insert a ByteString
. This is an unsafe operation:
- The
ByteString
could have the wrong encoding. - The
ByteString
might contain illegal HTML characters (no escaping is done).
:: ByteString | Value to insert |
-> Markup ev | Resulting HTML fragment |
Insert a lazy ByteString
. See unsafeByteString
for reasons why this
is an unsafe operation.
Creating tags.
Converting values to attribute values.
class ToValue a where Source #
Class allowing us to use a single function for attribute values
toValue :: a -> AttributeValue Source #
Convert a value to an attribute value
preEscapedToValue :: a -> AttributeValue Source #
Convert a value to an attribute value without escaping
Instances
ToValue Bool Source # | |
toValue :: Bool -> AttributeValue Source # | |
ToValue Char Source # | |
toValue :: Char -> AttributeValue Source # | |
ToValue Double Source # | |
toValue :: Double -> AttributeValue Source # | |
ToValue Float Source # | |
toValue :: Float -> AttributeValue Source # | |
ToValue Int Source # | |
toValue :: Int -> AttributeValue Source # | |
ToValue Int32 Source # | |
toValue :: Int32 -> AttributeValue Source # | |
ToValue Int64 Source # | |
toValue :: Int64 -> AttributeValue Source # | |
ToValue Integer Source # | |
toValue :: Integer -> AttributeValue Source # | |
ToValue Word Source # | |
toValue :: Word -> AttributeValue Source # | |
ToValue Word32 Source # | |
toValue :: Word32 -> AttributeValue Source # | |
ToValue Word64 Source # | |
toValue :: Word64 -> AttributeValue Source # | |
ToValue String Source # | |
toValue :: String -> AttributeValue Source # | |
ToValue Text Source # | |
toValue :: Text -> AttributeValue Source # | |
ToValue Text Source # | |
toValue :: Text -> AttributeValue Source # | |
ToValue AttributeValue Source # | |
unsafeByteStringValue Source #
:: ByteString | ByteString value |
-> AttributeValue | Resulting attribute value |
Create an attribute value from a ByteString
. See unsafeByteString
for reasons why this might not be a good idea.
unsafeLazyByteStringValue Source #
:: ByteString | ByteString value |
-> AttributeValue | Resulting attribute value |
Create an attribute value from a lazy ByteString
. See
unsafeByteString
for reasons why this might not be a good idea.
Setting attributes
(!) :: Attributable h ev => h -> Attribute ev -> h Source #
Apply an attribute to an element.
Example:
img ! src "foo.png"
Result:
<img src="foo.png" />
This can be used on nested elements as well.
Example:
p ! style "float: right" $ "Hello!"
Result:
<p style="float: right">Hello!</p>
(!?) :: Attributable h ev => h -> (Bool, Attribute ev) -> h Source #
Shorthand for setting an attribute depending on a conditional.
Example:
p !? (isBig, A.class "big") $ "Hello"
Gives the same result as:
(if isBig then p ! A.class "big" else p) "Hello"