From bf4200e3c53d430e7675d4df1ba39dfaed5b4cee Mon Sep 17 00:00:00 2001 From: freesource Date: Fri, 8 Mar 2002 03:45:26 +0000 Subject: [PATCH] Fixed a little bug where initrd= wasn't being passed. Everythings looks good with the default Initrd.gz. --- BootRoot/BootRoot.pm | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/BootRoot/BootRoot.pm b/BootRoot/BootRoot.pm index 89dc7f6..545d841 100644 --- a/BootRoot/BootRoot.pm +++ b/BootRoot/BootRoot.pm @@ -53,6 +53,9 @@ my $uml_xterm = "xterm -e"; # and to update scripts/Debian.yard if # make_debian has been changed, # and to install -s linux. +# and to make sure modules are correct in Initrd.gz +# apply special patches + my $version = "1.3.5"; my $date = "02.13.2002"; my $gtk_perl_version = "0.7002"; @@ -60,6 +63,7 @@ my $pwd = `pwd`; chomp $pwd; my $home_rootfs = "$home/root_filesystem/"; my $home_uml_kernel = "$home/uml_kernel/"; my $modules_directory = "/lib/modules"; +my $Initrd = "/usr/lib/bootroot/root_filesystem/Initrd.gz"; # This is for experimental stuff .. basically so I can test # the boot fs as a normal user, since it's hard to create a boot disk @@ -1729,7 +1733,7 @@ sub uml_box { #_______________________________________ - # Submit Button +# Submit Button my $submit_b = button_advanced(0,1,7,8,"Submit",$table_uml); $tooltips->set_tip( $submit_b, "Start uml kernel processes.", @@ -1869,7 +1873,7 @@ sub uml_box { # Decide what to do with initrd if ( !$initrd ) { - $initrd = "initrd=Initrd"; + $initrd = "initrd=" . $Initrd; } else {