@@ -49,7 +49,10 @@ import Data.String ( fromString )
49import Data.Maybe ( catMaybes, fromMaybe )
49import Data.Maybe ( catMaybes, fromMaybe )
50import Control.Monad.State
50import Control.Monad.State
51import Text.Blaze.Html hiding(contents)
51import Text.Blaze.Html hiding(contents)
52+#if MIN_VERSION_blaze_markup(0,6,3)
52import Text.Blaze.Internal(preEscapedString)
54import Text.Blaze.Internal(preEscapedString)
53#if MIN_VERSION_blaze_html(0,5,1)
56#if MIN_VERSION_blaze_html(0,5,1)
54import qualified Text.Blaze.XHtml5 as H5
57import qualified Text.Blaze.XHtml5 as H5