1
0
mirror of https://github.com/fspc/gbootroot.git synced 2025-03-11 23:33:23 -04:00

Had to add more changes to expect_uml and UML so that there will be an

established PATH, and so that uml_mconsole's system command won't be
issued until the last line is actually come to via a new method.

Nothing can ever be too simple.
This commit is contained in:
freesource 2003-02-20 07:45:47 +00:00
parent 6aa8a42f3a
commit e9030a5ecc

View File

@ -115,7 +115,9 @@ sub command {
foreach my $str (@expects){
$str ne "-re" and push @strings, $str;
}
$me->{expect_handle}->print("$cmd\n");
# adding an \r handles some buggy expectations
$me->{expect_handle}->print("$cmd\r\n");
my @match = $me->{expect_handle}->expect(undef, @expects);
defined $match[0] and $match[0]--;
if(defined($match[1])){