11 lines
194 B
Haskell
11 lines
194 B
Haskell
|
module Files (
|
||
|
find
|
||
|
) where
|
||
|
|
||
|
import System.FilePath ((</>))
|
||
|
import System.Directory (listDirectory)
|
||
|
|
||
|
find :: FilePath -> IO [FilePath]
|
||
|
find path =
|
||
|
fmap (path </>) <$> listDirectory path
|