bike/gbootroot
1
0
Fork 0
mirror of https://github.com/fspc/gbootroot.git synced 2025-02-23 09:03:23 -05:00
Code Issues Projects Releases Wiki Activity

This fixes the problem with paths only being allowed to be altered initally,

Browse Source 
what was happening was that @paths couldn't be changed after they were
defined, but not any more.
This commit is contained in:
freesource 2001-11-18 05:56:44 +00:00
parent 780ac8b3d8
commit 38aaef1e04
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
BootRoot/Yard.pm
View File

@ -1521,9 +1521,9 @@ sub find_file_in_path {
my($file, @path) = @_;
if (!@path) {
## if (!@path) {
##### Initialize @pathlist if necessary
if (!@pathlist) {
## if (!@pathlist) {
@pathlist = split(':', $ENV{'PATH'});
if (defined(@::additional_dirs)) {
unshift(@pathlist, @::additional_dirs);
@ -1531,10 +1531,10 @@ sub find_file_in_path {
$ENV{"PATH"} = join(":", @::additional_dirs) .
":$ENV{'PATH'}";
}
info(1, "Using search path:\n", join(" ", @pathlist), "\n");
}
##info(1, "Using search path:\n", join(" ", @pathlist), "\n");
## }
@path = @pathlist;
}
## }
if ($file) {