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

Commit 4045eeb02bebe2834c13673963d1fb747fb25d2e
Parent: d6f88d83b1b5ad51373e8610bdec9a1398d5b965
Author: mcol <mcol@posteo.net>
Date: 2021-10-04 22:09:47 +0100
Committer: mcol <mcol@posteo.net>
Committed: 2021-10-04 22:09:47 +0100

any id -> or

src/Templates.hs Modified

@@ -117,7 +117,7 @@
   where
     isTemplate' :: FilePath -> Bool
     isTemplate' p =
-        not (isScoped config p) && any id (flip isSuffixOf p <$> ["html", "css", "js"])
+        not (isScoped config p) && or (flip isSuffixOf p <$> ["html", "css", "js"])
 
 {-
 This is used to filter files in the template directory to exclude those specified by the