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

Comparing COMP/SCRAM/src/clientfile.pm (file contents):
Revision 1.1 by williamc, Mon Mar 1 10:37:54 1999 UTC vs.
Revision 1.2 by williamc, Mon Mar 1 11:01:42 1999 UTC

# Line 1 | Line 1
1 #!/usr/local/bin/perl5
2 #
1   # Make a client specific file for external products
2   #
3   #
4  
5   package clientfile;
6 + require 5.001;
7   require Exporter;
8   @ISA = qw(Exporter);
9   @EXPORT = qw(BuildClientFile);
# Line 17 | Line 16 | sub BuildClientFile($projectfile) {
16          my $projectfile=shift;
17          my $archdir=".SCRAM/$ENV{SCRAM_ARCH}";
18          my $clientfile="$archdir/clientsettings";
19 <        use AddDir;
19 >        use Utilities::AddDir;
20          use ToolBox;
21  
22          adddir($archdir);
# Line 36 | Line 35 | sub BuildClientFile($projectfile) {
35  
36   sub _ParseProjectReqs($reqfile) {
37          my $reqfile=shift;
38 <        use Switcher;
38 >        use Utilities::Switcher;
39  
40          $taglist={
41                  'require' => 'none',
# Line 134 | Line 133 | sub _tool {
133            };
134                 # 'INCLUDE_StartTag' => \&INCLUDE_start ,
135  
136 <        use Switcher;
136 >        use Utilities::Switcher;
137          $toolswitch=Switcher->new($toollist,$toolfile);
138          $toolswitch->parse();
139  

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines