--- perlindex-1.302/perlindex.PL-	2004-05-21 21:37:51 +0000

+++ perlindex-1.302/perlindex.PL	2004-06-17 14:56:46 +0000

@@ -356,11 +356,11 @@ sub search {

                     my ($path) = ($selection =~ m:(\S+)$:);

                     $path = $prefix.'/'.$path;

                     print STDERR "Running pod2man $path\n";

-                    system "pod2man --official $path | $nroff -man | $pager";

+                    system "perldoc -F $path";

                 }

             } else {

                 my $path = $prefix."/bin/perlindex";

-                system "pod2man --official $path | $nroff -man | $pager";

+                system "perldoc -F $path";

             }

         }

         &cbreak('off') if $opt_cbreak;