jak uzyskać ciągi znaków (nie literały łańcuchowe) w atrybutach blazehtml/zawartości elementu?

Question

Samouczek dotyczący blazehtml i innych postów na blogu bardzo wyraźnie pokazuje, jak napisać literały łańcuchowe. Mam to. Ale w jaki sposób uzyskać ciągi (bytestrings, Data.Text, itp. Też by działało.) W ogóle do atrybutów/zawartości elementów. Blazehtml wygląda świetnie, ale bez tego wydaje się całkiem bezużyteczny. = P

oto wyjście próbki i kod, aby pokazać dokładnie problem:

{-# LANGUAGE OverloadedStrings #-} 

import Prelude 
import qualified Prelude as P 
import Text.Blaze.Html5 
import Text.Blaze.Html5.Attributes 
import qualified Text.Blaze.Html5 as H 
import qualified Text.Blaze.Html5.Attributes as A 

makeLink dest cont = renderHtml $ a ! src dest $ cont 

 
*Main> let foo = "foo" 
*Main> let bar = "bar" 
*Main> makeLink foo bar 

:1:9: 
    Couldn't match expected type `AttributeValue' 
      against inferred type `[Char]' 
    In the first argument of `makeLink', namely `foo' 
    In the expression: makeLink foo bar 
    In the definition of `it': it = makeLink foo bar 

Answer 1

Na tej stronie dokumentacji jeden znajdzie niezbędne funkcje: http://hackage.haskell.org/packages/archive/blaze-html/0.1.2/doc/html/Text-Blaze.html.

Są to stringValue :: String -> AttributeValue i string :: String -> Html a. Problem rozwiązany!