Which's the equivalent for
...
import Happstack.Server.Heist
pageHeist :: B.ByteString -> [(T.Text,T.Text)] -> ServerPart Response
kfzPaginaHeist template par = do
pagina <- newTemplateDirectory' "template" $ bindStrings par defaultHeistState
render pagina template
with the new heist api? Also, did the and (or the way you're supposed to load templates) change?