This allows adds the kernel option for UML in expect_uml, it's amazing

what you find when you remove the system package.  Getting closer.
This commit is contained in:
freesource
2002-12-11 06:53:24 +00:00
parent 50bbbb674c
commit 29e9e73202
5 changed files with 32 additions and 12 deletions
+7 -5
View File
@@ -58,12 +58,13 @@ if ( !$ARGV[0] ) {
my $arguments = "$ARGV[0] $ARGV[1] $ARGV[2]";
my $mount_point = "$ARGV[3]";
my $preserve_ownership = "$ARGV[4]";
my $uml_kernel = "$ARGV[5]";
my $end = 6;
my $end = 7;
my $filesystem;
for ( 5 .. $#ARGV ) {
if ( $_ == 5 ) {
$filesystem = "$ARGV[5]";
for ( 6 .. $#ARGV ) {
if ( $_ == 6 ) {
$filesystem = "$ARGV[6]";
# What to do with the rieserfs command
if ( $filesystem eq "mkreiserfs" ) {
$filesystem = $filesystem . " -f -f -q";
@@ -82,6 +83,7 @@ for ( 5 .. $#ARGV ) {
my $uml =
BootRoot::UML->new( login_prompt => "bootroot login: ",
kernel => $uml_kernel,
arguments => $arguments,
login => "root",
password_prompt => "Password: ",
@@ -153,4 +155,4 @@ elsif ( $filesystem =~ /^mkfs\.jffs/ ) {
}
$uml->command("umount /mnt1; umount /mnt2");
$uml->halt();
$uml->halt()