use GHC6 compatible quasiquoter
This commit is contained in:
parent
237385fe04
commit
ebf95cfeb9
@ -53,7 +53,7 @@ defaultKerberosConfig = KerberosConfig id id
|
|||||||
-- | A configurable version of 'authKerberos'
|
-- | A configurable version of 'authKerberos'
|
||||||
genericAuthKerberos :: YesodAuth m => KerberosConfig -> AuthPlugin m
|
genericAuthKerberos :: YesodAuth m => KerberosConfig -> AuthPlugin m
|
||||||
genericAuthKerberos config = AuthPlugin "kerberos" dispatch $ \tm -> addHamlet
|
genericAuthKerberos config = AuthPlugin "kerberos" dispatch $ \tm -> addHamlet
|
||||||
[hamlet|
|
[QQ(hamlet)|
|
||||||
<div id="header">
|
<div id="header">
|
||||||
<h1>Login
|
<h1>Login
|
||||||
|
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user