diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2003-07-27 18:02:24 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-07-27 18:02:24 +0000 |
| commit | fe1343f790f30272aad7d506d7852dda8a668e7d (patch) | |
| tree | 6c45a319e2a3ad4636c39fb1b698bfa305c00c24 /lib/Pod | |
| parent | a60a0c7496116922c40e1fceebde1c1462633587 (diff) | |
| download | perl-fe1343f790f30272aad7d506d7852dda8a668e7d.tar.gz | |
Reapply some perldoc changes not in 3.09.
p4raw-id: //depot/perl@20234
Diffstat (limited to 'lib/Pod')
| -rw-r--r-- | lib/Pod/Perldoc.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/Pod/Perldoc.pm b/lib/Pod/Perldoc.pm index 55976b6a75..c069dfe623 100644 --- a/lib/Pod/Perldoc.pm +++ b/lib/Pod/Perldoc.pm @@ -360,7 +360,7 @@ sub init_formatter_class_list { $self->opt_M_with('Pod::Perldoc::ToPod'); # the always-there fallthru $self->opt_o_with('text'); - $self->opt_o_with('man') unless IS_MSWin32 || IS_Dos + $self->opt_o_with('man') unless IS_MSWin32 || IS_Dos || IS_Cygwin || !($ENV{TERM} && ( ($ENV{TERM} || '') !~ /dumb|emacs|none|unknown/i )); @@ -485,7 +485,7 @@ sub find_good_formatter_class { } else { $^W = 0; # The average user just has no reason to be seeing - # $^W-suppressable warnings from the the require! + # $^W-suppressable warnings from the require! } eval "require $c"; @@ -1701,7 +1701,7 @@ __END__ # it'll run faster. # # Version 1.01: Tue May 30 14:47:34 EDT 1995 -# Andy Dougherty <doughera@lafcol.lafayette.edu> +# Andy Dougherty <doughera@lafayette.edu> # -added pod documentation. # -added PATH searching. # -added searching pod/ subdirectory (mainly to pick up perlfunc.pod |