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

Comparing COMP/SCRAM/src/BootStrapProject.pm (file contents):
Revision 1.8 by williamc, Tue Mar 23 13:49:16 1999 UTC vs.
Revision 1.10.2.1 by williamc, Tue May 25 15:34:15 1999 UTC

# Line 51 | Line 51 | sub Bootlocaltop {
51  
52          $switch->checkparam($hashref, $name, "name");
53          $switch->checkparam($hashref, $name, "version");
54 <        $ENV{LOCALTOP}=&cwd."/".$$hashref{'name'}."_".$$hashref{'version'};
54 >        if ( ! defined $ENV{devareaname} ) {
55 >         $ENV{LOCALTOP}=&cwd."/".$$hashref{'name'}."_".$$hashref{'version'};
56 >        }
57 >        else {
58 >         $ENV{LOCALTOP}=&cwd."/".$ENV{devareaname};
59 >        }
60          $scramdir=$ENV{LOCALTOP}."/.SCRAM";
61          &AddDir::adddir($scramdir);
62          chdir $ENV{LOCALTOP};
# Line 98 | Line 103 | sub config_starttag {
103  
104          $hashref=$switch->SetupValueHash( \@vars );
105          $switch->checkparam($hashref, $name, "dir");
106 +        $$hashref{'dir'}=~s/`//g;
107          print ENVIRONMENT 'projconfigdir='.$$hashref{'dir'}."\n";
108          $ENV{SCRAM_BootStrapFiles}=$ENV{SCRAM_BootStrapFiles}.":".
109                  $ENV{LOCALTOP}."/".$$hashref{'dir'};
# Line 143 | Line 149 | sub reqs_start {
149          use clientfile;
150          $ENV{SCRAM_ProjReqsDoc}=
151            $currentdir."/".$$hashref{'name'};
152 +        print ENVIRONMENT 'SCRAM_ProjReqsDoc='.$ENV{SCRAM_ProjReqsDoc}."\n";
153   #       &urlhandler::urlhandler(&geturlbase."/".$$hashref{'name'},
154   #               $scramdir."/".$$hashref{'name'}) ;
155          if ( $switch->context("project") ) {

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines