summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorchromatic <chromatic@wgz.org>2001-10-10 09:50:30 -0600
committerJarkko Hietaniemi <jhi@iki.fi>2001-10-11 00:49:42 +0000
commit52728f1f20cc91e6de82286a48f4321c443c73bc (patch)
tree8da432ab21b613563faee707cf3ddda36b41d4f0 /lib
parentb0948e64228c31870c211a3f03a0748d2a811ccc (diff)
downloadperl-52728f1f20cc91e6de82286a48f4321c443c73bc.tar.gz
(was Re: lib/Term/Complete.t won't complete in background)
Message-ID: <20011010215627.13283.qmail@onion.perl.org> p4raw-id: //depot/perl@12398
Diffstat (limited to 'lib')
-rw-r--r--lib/Term/Complete.t2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Term/Complete.t b/lib/Term/Complete.t
index b73baf0c90..bfff3fb2cb 100644
--- a/lib/Term/Complete.t
+++ b/lib/Term/Complete.t
@@ -11,7 +11,7 @@ use vars qw( $Term::Complete::complete $complete );
my $restore;
SKIP: {
- skip('PERL_SKIP_TTY_TEST', 8) if $ENV{PERL_SKIP_TTY_TEST};
+ skip('PERL_SKIP_TTY_TEST', 8) if $ENV{PERL_SKIP_TTY_TEST} or !(-t STDIN);
my $TTY;
if ($^O eq 'rhapsody' && -c "/dev/ttyp0") { $TTY = "/dev/ttyp0" }