Browse Source

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.
master
freesource 22 years ago
parent
commit
e9030a5ecc
  1. 4
      BootRoot/UML.pm

4
BootRoot/UML.pm

@ -115,7 +115,9 @@ sub command {
foreach my $str (@expects){ foreach my $str (@expects){
$str ne "-re" and push @strings, $str; $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); my @match = $me->{expect_handle}->expect(undef, @expects);
defined $match[0] and $match[0]--; defined $match[0] and $match[0]--;
if(defined($match[1])){ if(defined($match[1])){

Loading…
Cancel
Save