[Xen-devel] [OSSTEST PATCH 04/11] TestSupport: Break out target_extract_distpart

[Ian Jackson <ian.jackson@xxxxxxxxxxxxx>]

No functional change.

Signed-off-by: Ian Jackson <Ian.Jackson@xxxxxxxxxxxxx>
---
 Osstest/TestSupport.pm | 10 +++++++++-
 ts-xen-install         |  4 +---
 2 files changed, 10 insertions(+), 4 deletions(-)

diff --git a/Osstest/TestSupport.pm b/Osstest/TestSupport.pm
index cebeb0d..6de566c 100644
--- a/Osstest/TestSupport.pm
+++ b/Osstest/TestSupport.pm
@@ -70,7 +70,8 @@ BEGIN {
                       target_run_apt
                       target_install_packages target_install_packages_norec
                       target_jobdir target_extract_jobdistpath_subdir
-                      target_extract_jobdistpath target_tftp_prefix
+                      target_extract_jobdistpath target_extract_distpart
+                     target_tftp_prefix
                       lv_create lv_dev_mapper
 
                       poll_loop tcpconnect await_tcp
@@ -2343,6 +2344,13 @@ sub target_extract_jobdistpath ($$$$$) {
     target_cmd_root($ho, "cd / && tar -hzxf $distcopy", 300);
 }
 
+sub target_extract_distpart ($$;$) {
+    my ($ho, $part, $distpath_r) = @_;
+    target_extract_jobdistpath($ho, $part, "path_${part}dist",
+               $r{"$ho->{Ident}_${part}buildjob"} // $r{"${part}buildjob"},
+               $distpath_r);
+}
+
 sub target_tftp_prefix ($) {
     my ($ho) = @_;
 
diff --git a/ts-xen-install b/ts-xen-install
index fcbb697..17f7662 100755
--- a/ts-xen-install
+++ b/ts-xen-install
@@ -81,9 +81,7 @@ sub extract () {
     push @parts, 'libvirt' if $r{toolstack} eq "libvirt";
 
     foreach my $part (@parts) {
-        target_extract_jobdistpath($ho, $part, "path_${part}dist",
-               $r{"$ho->{Ident}_${part}buildjob"} // $r{"${part}buildjob"},
-               \%distpath);
+       target_extract_distpart($ho, $part, \%distpath);
     }
     if (target_file_exists($ho, "/usr/lib64/efi/xen.efi")) {
        target_cmd_root($ho,<<END);
-- 
2.1.4


_______________________________________________
Xen-devel mailing list
Xen-devel@xxxxxxxxxxxxxxxxxxxx
https://lists.xenproject.org/mailman/listinfo/xen-devel