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

Comparing COMP/SCRAM/src/BuildSystem/Build.pm (file contents):
Revision 1.3 by williamc, Fri Sep 15 11:18:21 2000 UTC vs.
Revision 1.4 by williamc, Fri Sep 29 06:45:51 2000 UTC

# Line 13 | Line 13
13  
14   package BuildSystem::Build;
15   use BuildSystem::BuildReport;
16 + use BuildSystem::BuildSetup;
17   use Utilities::Verbose;
18   require 5.004;
19   @ISA=qw(Utilities::Verbose);
# Line 24 | Line 25 | sub new {
25          $self->{area}=shift;
26          $self->{area}->copyenv(\%ENV);
27          $ENV{LOCALTOP}=$self->{area}->location();
28 +
29 +        # -- set RELEASTOP
30 +        my $rarea=$self->{area}->linkarea();
31 +        if ( ! defined $rarea ) {
32 +          $ENV{RELEASETOP}=$ENV{LOCALTOP};
33 +        }
34 +        else {
35 +          $ENV{RELEASETOP}=$rarea->location();
36 +        }
37 +
38          $self->verbose("LOCALTOP=".$ENV{LOCALTOP});
39 +        $self->verbose("RELEASETOP=".$ENV{RELEASETOP});
40          return $self;
41   }
42  

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines