mirror of
https://github.com/fspc/gbootroot.git
synced 2025-02-23 09:03:23 -05:00
* minor edit
This commit is contained in:
parent
ebe2b7cab3
commit
16612c0321
5
Yard.pm
5
Yard.pm
@ -1141,6 +1141,7 @@ sub sync {
|
||||
}
|
||||
|
||||
## Need to put error() checking here
|
||||
## This is used for ./Replacements config_dest == /etc/yard
|
||||
# find_file_in_path(file, path)
|
||||
# Finds filename in path. Path defaults to @pathlist if not provided.
|
||||
# If file is relative, file is resolved relative to config_dest and lib_dest.
|
||||
@ -1149,6 +1150,8 @@ sub find_file_in_path {
|
||||
|
||||
my($file, @path) = @_;
|
||||
|
||||
|
||||
|
||||
if (!@path) {
|
||||
##### Initialize @pathlist if necessary
|
||||
if (!@pathlist) {
|
||||
@ -1165,11 +1168,11 @@ sub find_file_in_path {
|
||||
}
|
||||
|
||||
|
||||
|
||||
if ($file) {
|
||||
|
||||
##### Relative filename, search for it
|
||||
my($dir);
|
||||
## foreach $dir (@path, $config_dest, $lib_dest
|
||||
foreach $dir (@path) {
|
||||
my($abs_file) = "$dir/$file";
|
||||
return $abs_file if -e $abs_file;
|
||||
|
Loading…
x
Reference in New Issue
Block a user