Fix multiarch/unstable support for packages listings.
git-svn-id: http://emdebian.org/svn/current@8329 563faec7-e20c-0410-992a-a66f704d0ccd
This commit is contained in:
parent
76a5552663
commit
a4bfe47610
2 changed files with 10 additions and 4 deletions
6
debian/changelog
vendored
6
debian/changelog
vendored
|
@ -1,3 +1,9 @@
|
|||
multistrap (2.1.19) experimental; urgency=low
|
||||
|
||||
* Fix multiarch/unstable support for packages listings.
|
||||
|
||||
-- Neil Williams <codehelp@debian.org> Sat, 21 Apr 2012 14:45:49 +0100
|
||||
|
||||
multistrap (2.1.18) experimental; urgency=low
|
||||
|
||||
* Reverse logic of ignorenativearch, thanks to
|
||||
|
|
|
@ -1138,8 +1138,8 @@ sub cascade {
|
|||
if (defined $keys{$section}{'configscript'} and (not defined $configsh));
|
||||
$tgzname = lc($keys{$section}{'tarballname'})
|
||||
if (defined $keys{$section}{'tarballname'} and (not defined $tgzname));
|
||||
chomp($tgzname);
|
||||
undef $tgzname if ($tgzname eq '');
|
||||
chomp($tgzname) if (defined $tgzname);
|
||||
undef $tgzname if (defined $tgzname and $tgzname eq '');
|
||||
undef $configsh if ((defined $configsh) and (not -x $configsh));
|
||||
$setupsh = lc($keys{$section}{'setupscript'})
|
||||
if (defined $keys{$section}{'setupscript'} and (not defined $setupsh));
|
||||
|
@ -1247,9 +1247,9 @@ sub cascade {
|
|||
}
|
||||
} else {
|
||||
if (ref ($keys{$section}{'packages'}) eq 'ARRAY') {
|
||||
$packages{$section}=join(' ', @{$keys{$section}{'packages'}}) if (not exists $packages{$section});
|
||||
$packages{$section}=join(' ', @{$keys{$section}{'packages'}});
|
||||
} else {
|
||||
$packages{$section}=join(' ', $keys{$section}{'packages'}) if (exists $packages{$section});
|
||||
$packages{$section}=join(' ', $keys{$section}{'packages'});
|
||||
}
|
||||
}
|
||||
$suites{$section}=$keys{$section}{'suite'}
|
||||
|
|
Loading…
Reference in a new issue