--- 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;