9b54c8
From d469b8609b566b972c7cc3ed74029cdddea50eee Mon Sep 17 00:00:00 2001
9b54c8
From: Jitka Plesnikova <jplesnik@redhat.com>
9b54c8
Date: Thu, 24 May 2018 10:48:47 +0200
9b54c8
Subject: [PATCH] Upgrade to 3.2801
9b54c8
9b54c8
---
9b54c8
 lib/Pod/Perldoc.pm | 12 +-----------
9b54c8
 1 file changed, 1 insertion(+), 11 deletions(-)
9b54c8
9b54c8
diff --git a/lib/Pod/Perldoc.pm b/lib/Pod/Perldoc.pm
9b54c8
index 8d695b2..bb6ffc8 100644
9b54c8
--- a/lib/Pod/Perldoc.pm
9b54c8
+++ b/lib/Pod/Perldoc.pm
9b54c8
@@ -12,7 +12,7 @@ use File::Spec::Functions qw(catfile catdir splitdir);
9b54c8
 use vars qw($VERSION @Pagers $Bindir $Pod2man
9b54c8
   $Temp_Files_Created $Temp_File_Lifetime
9b54c8
 );
9b54c8
-$VERSION = '3.28';
9b54c8
+$VERSION = '3.2801';
9b54c8
 
9b54c8
 #..........................................................................
9b54c8
 
9b54c8
@@ -486,11 +486,6 @@ sub init_formatter_class_list {
9b54c8
 
9b54c8
   $self->opt_M_with('Pod::Perldoc::ToPod');   # the always-there fallthru
9b54c8
   $self->opt_o_with('text');
9b54c8
-  $self->opt_o_with('term') 
9b54c8
-    unless $self->is_mswin32 || $self->is_dos || $self->is_amigaos
9b54c8
-       || !($ENV{TERM} && (
9b54c8
-              ($ENV{TERM} || '') !~ /dumb|emacs|none|unknown/i
9b54c8
-           ));
9b54c8
 
9b54c8
   return;
9b54c8
 }
9b54c8
@@ -1937,11 +1932,6 @@ sub page {  # apply a pager to the output file
9b54c8
 	    } elsif($self->is_amigaos) { 
9b54c8
                 last if system($pager, $output) == 0;
9b54c8
             } else {
9b54c8
-                my $formatter = $self->{'formatter_class'};
9b54c8
-                if ( $formatter->can('pager_configuration') ) {
9b54c8
-                  $self->aside("About to call $formatter" . "->pager_configuration(\"$pager\")\n");
9b54c8
-                  $formatter->pager_configuration($pager, $self);
9b54c8
-                }
9b54c8
                 last if system("$pager \"$output\"") == 0;
9b54c8
             }
9b54c8
         }
9b54c8
-- 
9b54c8
2.14.3
9b54c8