bike/gbootroot
1
0
Fork 0
mirror of https://github.com/fspc/gbootroot.git synced 2025-11-04 00:05:35 -05:00
Code Issues Projects Releases Wiki Activity

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

Browse Source 
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
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
BootRoot/UML.pm
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])){