Pod::Text nit for Win32
Gurusamy Sarathy [Wed, 11 Jun 1997 00:00:00 +0000 (12:00 +1200)]
lib/Pod/Text.pm

index f723bb3..2b6c6b6 100644 (file)
@@ -79,7 +79,7 @@ if($termcap and !$setuptermcap) {
 $SCREEN = ($_[0] =~ /^-(\d+)/ && (shift, $1))
        ||  $ENV{COLUMNS}
        || ($ENV{TERMCAP} =~ /co#(\d+)/)[0]
-       || (`stty -a 2>/dev/null` =~ /(\d+) columns/)[0]
+       || ($^O ne 'MSWin32' && (`stty -a 2>/dev/null` =~ /(\d+) columns/)[0])
        || 72;
 
 @_ = ("<&STDIN") unless @_;