[Bio] / FigCommon / bootstrap.pl Repository:
ViewVC logotype

Diff of /FigCommon/bootstrap.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.4, Tue Dec 23 19:20:44 2003 UTC revision 1.5, Tue Jan 6 22:32:38 2004 UTC
# Line 213  Line 213 
213    
214  sub find_in_path  sub find_in_path
215  {  {
216      my($file) = @_;      my($file, @extra) = @_;
217      my(@path) = split(":", $ENV{PATH});      my(@path) = split(":", $ENV{PATH});
218    
219      for my $p (@path)      for my $p (@path, @extra)
220      {      {
221          my $x = "$p/$file";          my $x = "$p/$file";
222          if (-x $x)          if (-x $x)

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3