use fork of filemanip

2021-04-16 21:34:48 +02:00 · 2021-04-16 21:34:48 +02:00 · 519ccf2fef
parent 31acd4189b
commit 519ccf2fef
2 changed files with 7 additions and 1 deletions
--- a/cabal.project
+++ b/cabal.project
@ -1 +1,6 @@
 packages: ./make-pages
+
+source-repository-package
+    type: git
+    location: https://git.rhiannon.website/rhi/filemanip
+    tag: 0edef8f7bbfe8e210f546e3222b735a32e6055e3
--- a/make-pages/Main.hs
+++ b/make-pages/Main.hs
@ -110,7 +110,8 @@ infoYAML dataDir f = do
  pure (f', info)

 findInfos :: FilePath -> FilePath -> IO [FilePath]
-findInfos dataDir infoName = File.find always (fileName ==? infoName) dataDir
+findInfos dataDir infoName =
+  File.findL True always (fileName ==? infoName) dataDir

 readYAML :: YAML.FromYAML a => FilePath -> IO a
 readYAML file = ByteString.readFile file >>= decode1Must file