a few things available elsewhere...
This commit is contained in:
parent
bed495db64
commit
5e172b43c4
2 changed files with 10 additions and 3 deletions
|
@ -47,7 +47,10 @@ dirContains a b = a == b || a' == b' || (a'++"/") `isPrefixOf` b'
|
|||
a' = norm a
|
||||
b' = norm b
|
||||
|
||||
{- Converts a filename into a normalized, absolute path. -}
|
||||
{- Converts a filename into a normalized, absolute path.
|
||||
-
|
||||
- Unlike Directory.canonicalizePath, this does not require the path
|
||||
- already exists. -}
|
||||
absPath :: FilePath -> IO FilePath
|
||||
absPath file = do
|
||||
cwd <- getCurrentDirectory
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue