diff options
author | Jim Meyering <jim@meyering.net> | 2003-04-28 20:29:22 +0000 |
---|---|---|
committer | Jim Meyering <jim@meyering.net> | 2003-04-28 20:29:22 +0000 |
commit | 5ac1c723056268f81ac320648a6d4b6c368f61ab (patch) | |
tree | 45b18a9d5ea1debd963205a410b0b5e6b2716c37 /tests/misc | |
parent | 8cfd51fbe577b55943a2b85172e7ba1e06df9aee (diff) | |
download | coreutils-5ac1c723056268f81ac320648a6d4b6c368f61ab.tar.xz |
Send two tokens, not just one, so we don't
make the now-more-picky tsort fail.
Diffstat (limited to 'tests/misc')
-rwxr-xr-x | tests/misc/tty-eof | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/tests/misc/tty-eof b/tests/misc/tty-eof index 831626e6a..aca723526 100755 --- a/tests/misc/tty-eof +++ b/tests/misc/tty-eof @@ -36,9 +36,9 @@ $@ and (warn "$ME: this script requires Perl's Expect package >=1.11\n"), $exp->log_user(0); $exp->spawn($cmd) or (warn "$ME: cannot run `$cmd': $!\n"), $fail=1, next; - $exp->send("foo\n"); + $exp->send("a b\n"); $exp->send(''); # FIXME: it'd be better not to hard-code ^D here - $exp->expect (0, '-re', "^foo\\r?\$"); + $exp->expect (0, '-re', "^a b\\r?\$"); my $found = $exp->expect (1, '-re', "^.+\$"); # $found and warn "F: $found: " . $exp->exp_match () . "\n"; $exp->expect(1, 'eof'); |