]> git.ipfire.org Git - thirdparty/coreutils.git/commitdiff
Send two tokens, not just one, so we don't
authorJim Meyering <jim@meyering.net>
Mon, 28 Apr 2003 20:29:22 +0000 (20:29 +0000)
committerJim Meyering <jim@meyering.net>
Mon, 28 Apr 2003 20:29:22 +0000 (20:29 +0000)
make the now-more-picky tsort fail.

tests/misc/tty-eof

index 831626e6aa4bf3b8bcc29549cd5c7b19cb1d7bbe..aca723526fa0dbcf5ea1b4c5d9cefdd05571dc01 100755 (executable)
@@ -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('\ 4');  # 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');