Automatically move 'prog' files into volume root.
This commit is contained in:
parent
bcc77ca248
commit
7488effd5c
12
lib/boot.ks
12
lib/boot.ks
|
@ -31,14 +31,22 @@ function compileLibs {
|
||||||
}
|
}
|
||||||
|
|
||||||
for lib in libs {
|
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 {
|
function copyLibs {
|
||||||
parameter libs.
|
parameter libs.
|
||||||
for lib in 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).
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user