voidlizard
/
hbs2
mirror of https://github.com/voidlizard/hbs2
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

wip, rewrite glob, slow

This commit is contained in:
Dmitry Zuikov 2024-08-02 14:05:16 +03:00
parent a90a97a5a7
commit 91a9739ca7
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
hbs2-cli/lib/Data/Config/Suckless/Script/File.hs
View File

@ -40,7 +40,7 @@ glob pat ignore dir action = do
next (rest <> found) next (rest <> found)
else do else do
isF <- liftIO (doesFileExist p) isF <- liftIO (doesFileExist p)
when (matches pat p && not (skip p) ) do when (isF && matches pat p ) do
void $ action p void $ action p
next rest next rest