summaryrefslogtreecommitdiff
path: root/tests/misc/tty-eof
diff options
context:
space:
mode:
Diffstat (limited to 'tests/misc/tty-eof')
-rwxr-xr-xtests/misc/tty-eof4
1 files changed, 3 insertions, 1 deletions
diff --git a/tests/misc/tty-eof b/tests/misc/tty-eof
index a17b4abf5..bb0cc053e 100755
--- a/tests/misc/tty-eof
+++ b/tests/misc/tty-eof
@@ -22,7 +22,9 @@ use strict;
(my $ME = $ENV{ARGV_0}) =~ s|.*/||;
-eval { require Expect };
+# Some older versions of Expect.pm (e.g. 1.07) lack the log_user method,
+# so check for that, too.
+eval { require Expect; my $exp = new Expect; $exp->log_user(0) };
$@ and (warn "$ME: this script requires Perl's Expect package\n"), exit 77;
{