@@ -49,7 +49,10 @@ import Data.String ( fromString )
4949import Data.Maybe ( catMaybes, fromMaybe )
5050import Control.Monad.State
5151import Text.Blaze.Html hiding(contents)
52+#if MIN_VERSION_blaze_markup(0,6,3)
53+#else
5254import Text.Blaze.Internal(preEscapedString)
55+#endif
5356#if MIN_VERSION_blaze_html(0,5,1)
5457import qualified Text.Blaze.XHtml5 as H5
5558#else