[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index] [OSSTEST PATCH 40/49] Debian.pm: Break out standard_extradebs
Refactor this out of ts-xen-install. We are going to run it in ts-host-install. Signed-off-by: Ian Jackson <ian.jackson@xxxxxxxxxxxxx> --- Osstest/Debian.pm | 7 ++++++- ts-xen-install | 3 +-- 2 files changed, 7 insertions(+), 3 deletions(-) diff --git a/Osstest/Debian.pm b/Osstest/Debian.pm index d51ac493..60393ca9 100644 --- a/Osstest/Debian.pm +++ b/Osstest/Debian.pm @@ -51,7 +51,6 @@ BEGIN { di_vg_name debian_dhcp_rofs_fix debian_write_random_seed_command - some_extradebs ); %EXPORT_TAGS = ( ); @@ -1684,4 +1683,10 @@ sub some_extradebs ($$) { } } +sub standard_extradebs ($) { + my ($ho) = @_; + # $c{ DebianExtraPackages_<suite> } + some_extradebs($ho, [ 'DebianExtraPackages', $ho->{Suite} ]); +} + 1; diff --git a/ts-xen-install b/ts-xen-install index d67cd121..965fd519 100755 --- a/ts-xen-install +++ b/ts-xen-install @@ -74,8 +74,7 @@ sub packages () { sub extradebs () { my $suite = $ho->{Suite}; - # $c{ DebianExtraPackages_<suite> } - some_extradebs($ho, [ 'DebianExtraPackages', $suite ]); + standard_extradebs($ho); # $c{ DebianExtraPackages_<firmware>_<arch>_<suite> } my $firmware = get_host_property($ho, "firmware"); -- 2.20.1
|
Lists.xenproject.org is hosted with RackSpace, monitoring our |