From 16612c0321e1586d9f9398b3f71220e9a9f18f67 Mon Sep 17 00:00:00 2001 From: freesource Date: Fri, 15 Dec 2000 02:11:57 +0000 Subject: [PATCH] * minor edit --- Yard.pm | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/Yard.pm b/Yard.pm index 3ede166..116acc7 100644 --- a/Yard.pm +++ b/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;