Debian: plumb $want_kernver through in debian_boot_setup

diff --git a/Osstest/Debian.pm b/Osstest/Debian.pm
index e58a7cc0a348a4d84a6ad04d24bd1e284f60044c..574f4b14c9d3a4d981fb160466b8f69c28ec9b21 100644 (file)
--- a/Osstest/Debian.pm
+++ b/Osstest/Debian.pm
@@ -43,9 +43,9 @@ BEGIN {
 
 #---------- manipulation of Debian bootloader setup ----------
 
-sub debian_boot_setup ($$$;$) {
+sub debian_boot_setup ($$$$;$) {
     # $xenhopt==undef => is actually a guest, do not set up a hypervisor
-    my ($ho, $xenhopt, $distpath, $hooks) = @_;
+    my ($ho, $want_kernver, $xenhopt, $distpath, $hooks) = @_;
 
     target_kernkind_check($ho);
     target_kernkind_console_inittab($ho,$ho,"/");
@@ -70,9 +70,9 @@ sub debian_boot_setup ($$$;$) {
 
     my $bootloader;
     if ($ho->{Suite} =~ m/lenny/) {
-        $bootloader= setupboot_grub1($ho, $xenhopt, $kopt);
+        $bootloader= setupboot_grub1($ho, $want_kernver, $xenhopt, $kopt);
     } else {
-        $bootloader= setupboot_grub2($ho, $xenhopt, $kopt);
+        $bootloader= setupboot_grub2($ho, $want_kernver, $xenhopt, $kopt);
     }
 
     target_cmd_root($ho, "update-grub");
@@ -109,7 +109,7 @@ sub bl_getmenu_open ($$$) {
 }
 
 sub setupboot_grub1 ($$$) {
-    my ($ho,$xenhopt,$xenkopt) = @_;
+    my ($ho,$want_kernver,$xenhopt,$xenkopt) = @_;
     my $bl= { };
 
     my $rmenu= "/boot/grub/menu.lst";
@@ -182,7 +182,7 @@ sub setupboot_grub1 ($$$) {
 }
 
 sub setupboot_grub2 ($$$) {
-    my ($ho,$xenhopt,$xenkopt) = @_;
+    my ($ho,$wantkernver,$xenhopt,$xenkopt) = @_;
     my $bl= { };
 
     my $rmenu= '/boot/grub/grub.cfg';

diff --git a/ts-xen-install b/ts-xen-install
index fadfa53ef8ab6a9bda808174fbe0c20d2fc2fb7c..bf39f7e84e5ae83aac5003043256059c34858e6a 100755 (executable)
--- a/ts-xen-install
+++ b/ts-xen-install
@@ -145,6 +145,7 @@ sub setupboot () {
         };
     }
 
+    my $want_kernver = get_runvar('kernel_ver','kernbuildjob');
     debian_boot_setup($ho, $xenhopt, \%distpath, \@hooks);
 
     logm("ready to boot Xen");