在 Yesod 中总是 `$newline never`

【问题标题】：Always `$newline never` in Yesod在 Yesod 中总是 `$newline never`
【发布时间】：2017-05-26 08:37:47
【问题描述】：

$newline never in Hamlet 允许我们缩小 HTML 代码。如果我们将它设置在父窗口小部件中，它会对其生效，但不会对子窗口小部件生效。因此，当我们想要缩小整个代码时，我们必须将$newline never 设置为所有小部件。这不好。

您不知道更好的解决方案吗？谢谢。

【问题讨论】：

【解决方案1】：

您可以在其HamletSettings 中定义自己的默认为NoNewlines 的Hamlet 准引用器，如以下（未经测试的）代码sn-p：

import Text.Hamlet

myHamlet :: QuasiQuoter
myHamlet = hamletWithSettings hamletRules defaultHamletSettings{ hamletNewlines = NoNewlines}

然后简单地将其用作[myHamlet| ... |]。

【讨论】：