Invert search order

This commit is contained in:
Raffaele Mignone 2021-01-28 15:57:48 +01:00
parent bce1cc0901
commit a212b7894f
Signed by: norangebit
GPG Key ID: F5255658CB220573
1 changed files with 1 additions and 1 deletions

View File

@ -57,7 +57,7 @@ writeIndex podcasts templateName outdir = do
compileIndexTemplate :: String -> IO (Either ParseError Template)
compileIndexTemplate templateName = do
templateDir <- getDataFileName "templates"
automaticCompile [templateDir, "."] templateName
automaticCompile [".", templateDir] templateName
writeIndexTemplate :: Either ParseError Template -> Index -> String -> String -> IO ()
writeIndexTemplate (Left err) _ _ _ = print err