ViewVC Help
View File | Revision Log | Show Annotations | Root Listing
root/cvsroot/COMP/SCRAM/src/GetFilePath
(Generate patch)

Comparing COMP/SCRAM/src/GetFilePath (file contents):
Revision 1.1 by williamc, Mon May 31 16:46:14 1999 UTC vs.
Revision 1.1.2.1 by williamc, Mon May 31 16:46:15 1999 UTC

# Line 0 | Line 1
1 + #!/usr/local/bin/perl
2 + #
3 + # Check file locally and release top, returning the full actual path
4 + # Replacement occurs only if the library exists
5 + # first argument is file base
6 +
7 + $base=shift;
8 + @infiles=@ARGV;
9 + use Utilities::SCRAMUtils;
10 + $files="";
11 +
12 + foreach $file ( @infiles ) {
13 +        $files = $files." ".SCRAMUtils::checkfile("$base/$file");
14 + }
15 + print $files;
16 + exit 1;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines