use fork of filemanip
This commit is contained in:
parent
31acd4189b
commit
519ccf2fef
2 changed files with 7 additions and 1 deletions
|
@ -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
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue