HTML writer: Use XHtml5 only if blaze version current enough.

This commit is contained in:
John MacFarlane 2012-11-02 21:04:32 -07:00
parent 5b7d27912a
commit 63bed5dc2e

View file

@ -53,7 +53,11 @@ import Text.Blaze.Internal(preEscapedString)
#else #else
import Text.Blaze import Text.Blaze
#endif #endif
#if MIN_VERSION_blaze_html(0,5,1)
import qualified Text.Blaze.XHtml5 as H5 import qualified Text.Blaze.XHtml5 as H5
#else
import qualified Text.Blaze.Html5 as H5
#endif
import qualified Text.Blaze.XHtml1.Transitional as H import qualified Text.Blaze.XHtml1.Transitional as H
import qualified Text.Blaze.XHtml1.Transitional.Attributes as A import qualified Text.Blaze.XHtml1.Transitional.Attributes as A
import Text.Blaze.Renderer.String (renderHtml) import Text.Blaze.Renderer.String (renderHtml)