Changeset 28
- Timestamp:
- 12/12/05 18:10:42 (19 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/debbuild
r27 r28 142 142 } 143 143 # -> install if -.[ilabs] 144 if ($cmdopts{stage} eq 'i' || ($cmdopts{stage} =~ /[labs]/ && $cmdopts{short} ne 'y')) {145 #if ($cmdopts{stage} =~ /[ilabs]/) {144 #if ($cmdopts{stage} eq 'i' || ($cmdopts{stage} =~ /[labs]/ && $cmdopts{short} ne 'y')) { 145 if ($cmdopts{stage} =~ /[ilabs]/) { 146 146 install(); 147 147 } … … 259 259 if ($cmdopts{short} eq 'y' && $cmdopts{stage} =~ /[labs]/) { 260 260 warn "Can't use --short-circuit for $targets{$cmdopts{stage}} stage. Ignoring.\n"; 261 ##temp Allow short-circuit on full builds so we can experiment 262 # with apache pkg without spending hours recompiling repeatedly 263 # $cmdopts{short} = 'n'; 261 $cmdopts{short} = 'n'; 264 262 } 265 263 … … 617 615 } 618 616 619 print "\n\nmoving files for subpackages...\n";620 617 ##work 621 618 foreach my $pkg (@pkglist) { 622 #next if $pkg eq 'sources';623 print "got here, trying to move files for $pkg...\n";624 619 625 620 # Gotta do this first, otherwise we don't have a place to move files from %files 626 621 mkdir "$buildroot/$pkg"; 622 627 623 my @pkgfilelist = split ' ', $filelist{$pkg}; 628 624 foreach my $pkgfile (@pkgfilelist) { 629 #print "finding path for $pkgfile\n";630 625 my @filepath = ($pkgfile =~ /(.+)\/([a-zA-Z0-9_\.\+\-]+)$/); 631 626 qx { mkdir -p $buildroot/$pkg$filepath[0] } 632 627 if $filepath[0] ne ''; 633 #print "mkdir -p $buildroot/$pkg$filepath[0]\n";634 #print "$filepath[0]\n";635 628 qx { mv $buildroot$pkgfile $buildroot/$pkg$filepath[0] }; 636 #print "mv $buildroot$pkgfile $buildroot/$pkg$filepath[0]\n"; 637 } 638 #exit 0; 629 } 630 639 631 # Gotta do this next, otherwise the control file has nowhere to go. >:( 640 632 mkdir "$buildroot/$pkg/DEBIAN"; … … 650 642 close DEBSCRIPT; 651 643 652 #my $control;653 #eval {654 644 my $control = "Package: $pkgdata{$pkg}{name}\n". 655 645 "Version: $pkgdata{$pkg}{version}-$pkgdata{main}{release}\n". … … 660 650 "Description: $pkgdata{$pkg}{summary}\n"; 661 651 $control .= "$pkgdata{$pkg}{desc}\n"; 662 #};663 #die "control: $control\n\n $@ \n" if $@;664 652 665 653 open CONTROL, ">$buildroot/$pkg/DEBIAN/control";
Note:
See TracChangeset
for help on using the changeset viewer.