affine/flesh
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

add path manipulation functions

Browse source
This commit is contained in:
Ava Apples Affine 2023-03-23 12:07:28 -07:00
parent a711b32730
commit 3b1ae0efd5
Signed by: affine
GPG key ID: 3A4645B8CF806069
3 changed files with 24 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

9
snippets/userlib.rls
View file

@ -100,3 +100,12 @@ Returns true if the list contains the element.'
(set (q found) true)
(set (q list-iter) (pop remaining)))))
found))
(def get-paths
'returns each individual directory in PATH'
() (split PATH ':'))
(def add-path
'adds a directory to PATH'
(path) (set (q PATH)
(concat PATH ':' path)))