Peppermint
/
debian-cd-clone
mirror of https://salsa.debian.org/images-team/debian-cd.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Obvious bug fix in the new non-free code - fixes warnings and makes 

the non-free CD actually happen...
This commit is contained in:
Steve McIntyre 2000-06-07 00:28:28 +00:00
parent 5d4ff3914e
commit 57ba8f02c8
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
tools/cds2src
View File

@ -85,7 +85,7 @@ while (defined($_ = <SOURCES>)) {
next if not m/^Package: (\S+)\s*$/m;
$p = $1;
$included{$p} = 0;
$sources{$p}{"Package"} = $p;
$sources{$p}{"Package"} = $p;
foreach $re (qw/Binary Version Section Directory/) {
(m/^$re: (.*?)\s*$/m and $sources{$p}{$re} = $1)
|| msg(1, "Header field '$re' missing for source '$p'\n");
@ -172,7 +172,7 @@ if ($extranonfree and (! $nonfree))
my ($p, @toinclude);
# Finally accept non-free packages
foreach $p (grep { $excluded{$p} eq "nonfree" } (keys %sources))
foreach $p (grep { $excluded{$_} eq "nonfree" } (keys %sources))
{
$excluded{$p} = 0;
push @toinclude, $p;