| Safe Haskell | None |
|---|---|
| Language | Haskell2010 |
Text.Blaze.Front
Contents
Description
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
- toMarkup :: a -> Markup ev
- preEscapedToMarkup :: a -> Markup ev
- unsafeByteString :: ByteString -> Markup ev
- unsafeLazyByteString :: ByteString -> Markup ev
- textTag :: Text -> Tag
- stringTag :: String -> Tag
- class ToValue a where
- toValue :: a -> AttributeValue
- preEscapedToValue :: a -> AttributeValue
- 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.
Instances
| IsString Tag Source # | |
Defined in Text.Blaze.Front.Internal Methods fromString :: String -> Tag # | |
data AttributeValue Source #
The type for the value part of an attribute.
Instances
| IsString AttributeValue Source # | |
Defined in Text.Blaze.Front.Internal Methods fromString :: String -> AttributeValue # | |
| Semigroup AttributeValue Source # | |
Defined in Text.Blaze.Front.Internal Methods (<>) :: AttributeValue -> AttributeValue -> AttributeValue # sconcat :: NonEmpty AttributeValue -> AttributeValue # stimes :: Integral b => b -> AttributeValue -> AttributeValue # | |
| Monoid AttributeValue Source # | |
Defined in Text.Blaze.Front.Internal Methods mappend :: AttributeValue -> AttributeValue -> AttributeValue # mconcat :: [AttributeValue] -> AttributeValue # | |
| ToValue AttributeValue Source # | |
Defined in Text.Blaze.Front Methods toValue :: AttributeValue -> AttributeValue Source # preEscapedToValue :: AttributeValue -> AttributeValue Source # | |
Creating attributes.
Arguments
| :: 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."
Arguments
| :: 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
Minimal complete definition
Methods
toMarkup :: a -> Markup ev Source #
Convert a value to Markup.
preEscapedToMarkup :: a -> Markup ev Source #
Convert a value to Markup without escaping
Instances
Arguments
| :: ByteString | Value to insert. |
| -> Markup ev | Resulting HTML fragment. |
Insert a ChoiceString. This is an unsafe operation:
- The
ChoiceStringcould have the wrong encoding. - The
ChoiceStringmight contain illegal HTML characters (no escaping is done).
Arguments
| :: 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.
Create a Tag from some ChoiceString.
Create a Tag from a ChoiceString.
Converting values to attribute values.
class ToValue a where Source #
Class allowing us to use a single function for attribute values
Minimal complete definition
Methods
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
unsafeByteStringValue Source #
Arguments
| :: ByteString | ByteString value |
| -> AttributeValue | Resulting attribute value |
Create an attribute value from a ChoiceString. See unsafeByteString
for reasons why this might not be a good idea.
unsafeLazyByteStringValue Source #
Arguments
| :: 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"