🐙 Templated web page generator for your git repositories
git clone https://github.com/m-col/gitja
Files | Refs | Readme | License

Commit ef6f0ea9db308c55bae322ce4b5e92196c460003
Parent: 8ee4d39530e3b2d2d939e75a7466c5ac8928297f
Author: mcol <mcol@posteo.net>
Date: 2021-11-24 19:12:56 +0000
Committer: mcol <mcol@posteo.net>
Committed: 2021-11-24 19:12:56 +0000

use runGingerT directly

src/Templates.hs Modified

@@ -33,7 +33,7 @@
 import Text.Ginger.GVal (GVal)
 import Text.Ginger.Html (Html, htmlSource)
 import Text.Ginger.Parse (SourcePos, parseGingerFile, peErrorMessage)
-import Text.Ginger.Run (Run, easyRenderM)
+import Text.Ginger.Run (Run, easyContext, runGingerT)
 
 import Config
 
@@ -90,7 +90,7 @@
     IO ()
 generate output context template = do
     writeFile output "" -- Clear contents of file if it exists
-    void $ easyRenderM (writeTo output) context . templateGinger $ template
+    void $ runGingerT (easyContext (writeTo output) context) . templateGinger $ template
 
 ----------------------------------------------------------------------------------------
 -- Private -----------------------------------------------------------------------------