For now, hard-code linux-image=* in backports support

Keep the normal kernel on media *as well as* a backports kernel. d-i
will install the normal one first, then later upgrade it.
This commit is contained in:
Steve McIntyre 2018-08-14 00:35:53 +01:00
parent 31ec2cb178
commit bd0a1107c7
1 changed files with 14 additions and 3 deletions

View File

@ -46,9 +46,20 @@ open (LISTOUT, "> $listout") or die "ERROR: Can't write to $listout: $!\n";
while (defined($_=<LISTIN>)) {
chomp;
if (exists $backports{$_}) {
delete $backports{$_};
print LISTOUT "$_/$codename-backports\n";
print " Replaced $_ with $_/$codename-backports in $listout\n";
# Horrible to hard-code stuff here, but for now I don't see a
# better way. Keep the normal kernel on media *as well as* a
# backports kernel. d-i will install the normal one first,
# then later upgrade it.
if (m/^linux-image-/) {
print LISTOUT "$_/$codename-backports\n";
print LISTOUT "$_\n";
print " Keeping both $_ and $_/$codename-backports in $listout\n";
delete $backports{$_};
} else {
print LISTOUT "$_/$codename-backports\n";
print " Replaced $_ with $_/$codename-backports in $listout\n";
delete $backports{$_};
}
} else {
print LISTOUT "$_\n";
}