lib.filesystem: Minor refactor

Co-Authored-By: Robert Hensing <robert@roberthensing.nl>
This commit is contained in:
Silvan Mosberger 2023-04-05 16:13:03 +02:00
parent a1dedc908d
commit 5346636c20

View File

@ -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,