Yesod中用于电子邮件登录的自定义小部件

Question

我正在尝试为“电子邮件登录”表单定义自定义窗口小部件（特别是自定义Cassius样式）。 Email Auth插件公开了

的默认处理程序

• registerHandler
• forgotPasswordHandler
• setPasswordHandler

（https://www.stackage.org/haddock/lts-7.18/yesod-auth-1.4.15/Yesod-Auth-Email.html#g:5）

但登录处理程序没有人，默认小部件似乎在非导出函数emailLoginHandler中定义：https://www.stackage.org/haddock/lts-7.18/yesod-auth-1.4.15/src/Yesod.Auth.Email.html#emailLoginHandler

我希望login.hamlet中有login.cassius和templates/。我怎么能这样做？

Answer 1

目前没有办法实现这一点，所以我只是在default-layout.julius中编写了一堆hacky JS，以便在找到正确的元素时动态修改DOM并添加CSS属性。 / p>

但是现在yesod-auth包导出emailLoginHandler（here）和defaultEmailLoginHandler，所以现在很容易修改它，就像模块中的其他默认处理程序一样。