我正在尝试使用Text.Blaze.Html5
模块为Twitter Bootstrap输出最小模板,但它有如下的注释,我不知道如何包含在Blaze输出中(我看不到Text.Blaze.Html5
)中的任何“评论”功能:
<!--[if lt IE 9]>
<script src="https://oss.maxcdn.com/html5shiv/3.7.2/html5shiv.min.js"></script>
<script src="https://oss.maxcdn.com/respond/1.4.2/respond.min.js"></script>
<![endif]-->
(来自http://getbootstrap.com/getting-started/#template)
我应该如何生成这样的代码?
此处的文档http://jaspervdj.be/blaze/docs/Text-Blaze-Html5.html没有提供任何线索。
答案 0 :(得分:1)
您可以使用preEscapedText
中的Text.Blaze.Internal
。
以下是一个改编自the starter kit:
import Text.Blaze.Html5 (docTypeHtml)
import Views.Utils (pet) -- `pet` is an alias for `preEscapedText`
layout t b = docTypeHtml $ do
pet "<!--[if lt IE 7]> <html class='no-js lt-ie9 lt-ie8 lt-ie7'> <![endif]-->"
pet "<!--[if IE 7]> <html class='no-js lt-ie9 lt-ie8'/> <![endif]-->"
pet "<!--[if IE 8]> <html class='no-js lt-ie9'> <![endif]-->"
pet "<!--[if gt IE 8]><!--> <html class='no-js'> <!--<![endif]-->"