lbailly/liminix
1
0
Fork 0
forked from DGNum/liminix
Code Pull requests 2 Activity Actions

anoia: add basename, dirname

Browse source
This commit is contained in:
Daniel Barlow 2024-04-10 19:34:09 +01:00
parent f4bf3029fa
commit b231664a06
1 changed files with 8 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
pkgs/anoia/init.fnl
View file

@ -18,6 +18,12 @@
f (do (f:close) true)
_ false))
(fn basename [path]
(string.match path ".*/([^/]-)$"))
(fn dirname [path]
(string.match path "(.*)/[^/]-$"))
(fn system [s]
(match (os.execute s)
res (do (print (.. "Executed \"" s "\", exit code " (tostring res))) res)
@ -69,6 +75,8 @@
{
: assoc
: base64url
: basename
: dirname
: dup
: file-exists?
: hash