annabunches/kOS
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Automatically move 'prog' files into volume root.

Browse Source
This commit is contained in:
Anna Rose 2021-08-05 21:50:49 -04:00
parent bcc77ca248
commit 7488effd5c
1 changed files with 10 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
lib/boot.ks
View File

@ -31,14 +31,22 @@ function compileLibs {
}
for lib in libs {
compile "0:" + lib to "1:" + lib.
local tgt is lib.
if lib:StartsWith("/prog") {
set tgt to lib:Remove(0, 5).
}
compile "0:" + lib to "1:" + tgt.
}
}
function copyLibs {
parameter libs.
for lib in libs {
copypath("0:" + lib, "1:" + lib).
local tgt is lib.
if lib:StartsWith("/prog") {
set tgt to lib:Remove(0, 5).
}
copypath("0:" + lib, "1:" + tgt).
}
}