From mboxrd@z Thu Jan 1 00:00:00 1970 From: Ian Jackson Subject: [OSSTEST PATCH 5/9] Debian.pm: Pass $ho/$gho to preseed_base Date: Tue, 17 Feb 2015 17:50:27 +0000 Message-ID: <1424195431-1493-6-git-send-email-ian.jackson@eu.citrix.com> References: <1424195431-1493-1-git-send-email-ian.jackson@eu.citrix.com> Mime-Version: 1.0 Content-Type: text/plain; charset="us-ascii" Content-Transfer-Encoding: 7bit Return-path: Received: from mail6.bemta3.messagelabs.com ([195.245.230.39]) by lists.xen.org with esmtp (Exim 4.72) (envelope-from ) id 1YNmUq-0004xs-3h for xen-devel@lists.xenproject.org; Tue, 17 Feb 2015 18:03:44 +0000 In-Reply-To: <1424195431-1493-1-git-send-email-ian.jackson@eu.citrix.com> List-Unsubscribe: , List-Post: List-Help: List-Subscribe: , Sender: xen-devel-bounces@lists.xen.org Errors-To: xen-devel-bounces@lists.xen.org To: xen-devel@lists.xenproject.org Cc: Ian Jackson , Ian Campbell List-Id: xen-devel@lists.xenproject.org This is going to be useful soon. Signed-off-by: Ian Jackson --- Osstest/Debian.pm | 6 +++--- ts-debian-hvm-install | 2 +- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/Osstest/Debian.pm b/Osstest/Debian.pm index e3e1c90..a044f8f 100644 --- a/Osstest/Debian.pm +++ b/Osstest/Debian.pm @@ -503,8 +503,8 @@ sub di_installcmdline_core ($$;@) { return @cl; } -sub preseed_base ($$;@) { - my ($suite,$extra_packages,%xopts) = @_; +sub preseed_base ($$$;@) { + my ($ho,$suite,$extra_packages,%xopts) = @_; return <<"END"; d-i mirror/suite string $suite @@ -813,7 +813,7 @@ END my $extra_packages = join(",",@extra_packages); - my $preseed_file= preseed_base($suite,$extra_packages,%xopts); + my $preseed_file= preseed_base($ho,$suite,$extra_packages,%xopts); $preseed_file .= (<