Changeset 113


Ignore:
Timestamp:
Sep 6, 2007, 8:16:20 PM (12 years ago)
Author:
bruno
Message:

Fix some typos

File:
1 edited

Legend:

Unmodified
Added
Removed
  • devel/pb/bin/pb

    r112 r113  
    160160
    161161        # computes in which dir we have to work
    162         my $dir = $defpkgdir{$pbpkg};
    163         $dir = $extpkgdir{$pbpkg} if (not defined $dir);
     162        my $dir = $defpkgdir->{$pbpkg};
     163        $dir = $extpkgdir->{$pbpkg} if (not defined $dir);
    164164        print "dir: $dir\n";
    165165        pb_cms_export($cms,$pbdatecvs,"$ENV{'PBROOT'}/$dir",$dest);
     
    232232                    pb_filter_file_pb("$ENV{'PBROOT'}/$f",$ptr,"$dest/pbconf/$ddir-$dver/".basename($f),$dtype,$pbsuf,$pbpkg,$pbver,$pbtag,$pbrev,$pbdate,$defpkgdir,$extpkgdir);
    233233                }
    234                 if (defined $filteredfiles{$pbpkg}) {
    235                     foreach my $f (split(/,/,$filteredfiles{$pbpkg})) {
     234                if (defined $filteredfiles->{$pbpkg}) {
     235                    foreach my $f (split(/,/,$filteredfiles->{$pbpkg})) {
    236236                        pb_filter_file("$ENV{'PBROOT'}/$dir/$f",$ptr,"$dest/$f",$pbsuf,$pbpkg,$pbver,$pbtag,$pbrev,$pbdate);
    237237                    }
     
    263263
    264264        # Keep track of what is generated for default
    265         open(LAST,"> $pbrc{$ENV{'PBPROJ'}}") || die "Unable to create $pbrc{$ENV{'PBPROJ'}}";
     265        open(LAST,"> $pbrc->{$ENV{'PBPROJ'}}") || die "Unable to create $pbrc->{$ENV{'PBPROJ'}}";
    266266        print LAST "pbroot $pbprojver-$pbprojtag = $ENV{'PBROOT'}\n";
    267267        close(LAST);
Note: See TracChangeset for help on using the changeset viewer.