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

wip

This commit is contained in:
Dmitry Zuikov 2024-08-06 07:20:01 +03:00
parent 3ab7474a98
commit 1865d061f7
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
hbs2-sync/src/HBS2/Sync/Prelude.hs
View File

@ -865,6 +865,12 @@ syncEntries = do
, mkList [mkSym "run"] , mkList [mkSym "run"]
] ]
[] -> do
void $ evalTop [ mkList [mkSym "dir", mkStr "."]
, mkList [mkSym "run"]
]
_ -> pure () _ -> pure ()
brief "sets current directory" brief "sets current directory"