1
0
mirror of https://github.com/norangebit/ad-alta-voce synced 2025-02-16 11:41:18 +01:00

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

View File

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