/[d-i]/trunk/manual/debian/genbuilddeps
ViewVC logotype

Diff of /trunk/manual/debian/genbuilddeps

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 60213 by joeyh, Fri Oct 7 19:56:36 2005 UTC revision 60214 by fjp, Sun Aug 16 07:18:59 2009 UTC
# Line 1  Line 1 
1  #!/usr/bin/perl  #!/usr/bin/perl
2  # Generate build deps line from comments in the control file and replace  # Generate build deps line from comments in the control file and replace
3  # the current build deps line in the control file with it.  # the current Build-Depends-Indep line in the control file with it.
4    
5  my $control;  my $control;
6  if (-e "debian/control") {  if (-e "debian/control") {
# Line 28  close IN; Line 28  close IN;
28  my $builddeps=join(", ", @builddeps);  my $builddeps=join(", ", @builddeps);
29  open (OUT, ">$control.tmp") || die "write $control.tmp: $!";  open (OUT, ">$control.tmp") || die "write $control.tmp: $!";
30  foreach (@lines) {  foreach (@lines) {
31          s/^(Build-Depends:\s+)(.*)/$1$builddeps/;          s/^(Build-Depends-Indep:\s+)(.*)/$1$builddeps/;
32          print OUT || die "print: $!";          print OUT || die "print: $!";
33  }  }
34  close OUT || die "close: $!";  close OUT || die "close: $!";
Legend:
Removed from v.60213  
changed lines
  Added in v.60214
  ViewVC Help
Powered by ViewVC 1.1.5