diff --git a/cpanfile b/cpanfile index 2788cf967..0097fe261 100644 --- a/cpanfile +++ b/cpanfile @@ -144,7 +144,6 @@ requires 'Plack::Middleware::ServerStatus::Lite'; requires 'Plack::Middleware::Session'; requires 'Plack::Session::Store'; requires 'Pod::Markdown', '3.300'; -requires 'Pod::POM'; requires 'Pod::Simple', '3.43'; requires 'Pod::Simple::XHTML', '3.24'; requires 'Pod::Text', '4.14'; diff --git a/cpanfile.snapshot b/cpanfile.snapshot index 8d0bde768..c18661de3 100644 --- a/cpanfile.snapshot +++ b/cpanfile.snapshot @@ -6781,49 +6781,6 @@ DISTRIBUTIONS perl 5.008 strict 0 warnings 0 - Pod-POM-2.01 - pathname: N/NE/NEILB/Pod-POM-2.01.tar.gz - provides: - Pod::POM 2.01 - Pod::POM::Constants 2.01 - Pod::POM::Node 2.01 - Pod::POM::Node::Begin 2.01 - Pod::POM::Node::Code 2.01 - Pod::POM::Node::Content 2.01 - Pod::POM::Node::For 2.01 - Pod::POM::Node::Head1 2.01 - Pod::POM::Node::Head2 2.01 - Pod::POM::Node::Head3 2.01 - Pod::POM::Node::Head4 2.01 - Pod::POM::Node::Item 2.01 - Pod::POM::Node::Over 2.01 - Pod::POM::Node::Pod 2.01 - Pod::POM::Node::Sequence 2.01 - Pod::POM::Node::Text 2.01 - Pod::POM::Node::Verbatim 2.01 - Pod::POM::Nodes 2.01 - Pod::POM::Test 2.01 - Pod::POM::View 2.01 - Pod::POM::View::HTML 2.01 - Pod::POM::View::Pod 2.01 - Pod::POM::View::Text 2.01 - requirements: - Encode 0 - Exporter 0 - ExtUtils::MakeMaker 0 - File::Basename 0 - FindBin 0 - Getopt::Long 0 - Getopt::Std 0 - Text::Wrap 0 - constant 0 - lib 0 - overload 0 - parent 0 - perl 5.006 - strict 0 - vars 0 - warnings 0 Pod-Parser-1.67 pathname: M/MA/MAREKR/Pod-Parser-1.67.tar.gz provides: diff --git a/lib/MetaCPAN/Pod/Renderer.pm b/lib/MetaCPAN/Pod/Renderer.pm index 909951a68..a3605da9a 100644 --- a/lib/MetaCPAN/Pod/Renderer.pm +++ b/lib/MetaCPAN/Pod/Renderer.pm @@ -5,9 +5,8 @@ use MetaCPAN::Moose; use MetaCPAN::Pod::XHTML; use MetaCPAN::Types::TypeTiny qw( Uri ); use Pod::Markdown; -use Pod::POM (); -use Pod::POM::View::Pod; -use Pod::Text (); +use Pod::Simple::JustPod (); +use Pod::Text (); has perldoc_url_prefix => ( is => 'ro', @@ -34,7 +33,7 @@ sub markdown_renderer { sub pod_renderer { my $self = shift; - return Pod::POM->new; + return Pod::Simple::JustPod->new; } sub text_renderer { @@ -83,9 +82,7 @@ sub to_pod { my $self = shift; my $source = shift; - my $renderer = $self->pod_renderer; - my $pom = $renderer->parse_text($source); - return Pod::POM::View::Pod->print($pom); + return $self->_generic_render( $self->pod_renderer, $source ); } sub _generic_render {