lib.filesystem: Minor refactor
Co-Authored-By: Robert Hensing <robert@roberthensing.nl>
This commit is contained in:
parent
a1dedc908d
commit
5346636c20
1 changed files with 6 additions and 4 deletions
|
@ -3,7 +3,6 @@
|
|||
|
||||
let
|
||||
inherit (builtins)
|
||||
getAttr
|
||||
readDir
|
||||
pathExists
|
||||
;
|
||||
|
@ -22,17 +21,20 @@ in
|
|||
/*
|
||||
Returns the type of a path: regular (for file), symlink, or directory.
|
||||
*/
|
||||
pathType = path: getAttr (baseNameOf path) (readDir (dirOf path));
|
||||
pathType = path:
|
||||
(readDir (dirOf path)).${baseNameOf path};
|
||||
|
||||
/*
|
||||
Returns true if the path exists and is a directory, false otherwise.
|
||||
*/
|
||||
pathIsDirectory = path: if pathExists path then (pathType path) == "directory" else false;
|
||||
pathIsDirectory = path:
|
||||
pathExists path && pathType path == "directory";
|
||||
|
||||
/*
|
||||
Returns true if the path exists and is a regular file, false otherwise.
|
||||
*/
|
||||
pathIsRegularFile = path: if pathExists path then (pathType path) == "regular" else false;
|
||||
pathIsRegularFile = path:
|
||||
pathExists path && pathType path == "regular";
|
||||
|
||||
/*
|
||||
A map of all haskell packages defined in the given path,
|
||||
|
|
Loading…
Reference in a new issue