use GHC6 compatible quasiquoter

This commit is contained in:
Luite Stegeman 2011-09-02 18:03:30 +03:00
parent 237385fe04
commit ebf95cfeb9

View File

@ -53,7 +53,7 @@ defaultKerberosConfig = KerberosConfig id id
-- | A configurable version of 'authKerberos'
genericAuthKerberos :: YesodAuth m => KerberosConfig -> AuthPlugin m
genericAuthKerberos config = AuthPlugin "kerberos" dispatch $ \tm -> addHamlet
[hamlet|
[QQ(hamlet)|
<div id="header">
<h1>Login