Changeset 71 in ProjectBuilder for devel/pb/lib/ProjectBuilder/common.pm
- Timestamp:
- Aug 31, 2007, 3:32:39 PM (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
devel/pb/lib/ProjectBuilder/common.pm
r70 r71 51 51 # Set delivery directory 52 52 # 53 my $topdir= basename($pbrc{$proj});53 my $topdir=dirname($pbrc{$proj}); 54 54 chdir $topdir || die "Unable to change directory to $topdir"; 55 55 $ENV{'PBDESTDIR'}=$topdir."/delivery"; … … 60 60 if (not defined $ENV{'PBROOT'}) { 61 61 if (-f $pbrc{$proj}) { 62 $pbroot = pb_init($pbrc{$proj},"pbroot"); 62 my $pbroot = pb_init($pbrc{$proj},"pbroot"); 63 my %pbroot = %$pbroot; 63 64 # There is normaly only one line in it 64 65 $ENV{'PBROOT'} = (values %$pbroot)[0] if (defined $pbroot); … … 139 140 # Set build directory 140 141 # 141 $ENV{'PBBUILDDIR'}=$ path."/build";142 $ENV{'PBBUILDDIR'}=$topdir."/build"; 142 143 pbrm_rf($ENV{'PBBUILDDIR'}) if (-d "$ENV{'PBBUILDDIR'}"); 143 144 pbmkdir_p($ENV{'PBBUILDDIR'}) || die "Unable to recursively create $ENV{'PBBUILDDIR'}";
Note:
See TracChangeset
for help on using the changeset viewer.