weave some pod, respecting overridden authors/legal

[p5sagit/Devel-REPL.git] / lib / Devel / REPL / Plugin / PPI.pm

diff --git a/lib/Devel/REPL/Plugin/PPI.pm b/lib/Devel/REPL/Plugin/PPI.pm
index 5a58214..cb84861 100644 (file)
--- a/lib/Devel/REPL/Plugin/PPI.pm
+++ b/lib/Devel/REPL/Plugin/PPI.pm
@@ -1,14 +1,19 @@
-#!/usr/bin/perl
-
+use strict;
+use warnings;
 package Devel::REPL::Plugin::PPI;
-use Devel::REPL::Plugin;
+# ABSTRACT: PPI dumping of Perl code
+
+our $VERSION = '1.003027';
 
+use Devel::REPL::Plugin;
 use PPI;
 use PPI::Dumper;
+use namespace::autoclean;
 
-use namespace::clean -except => [ 'meta' ];
-
-with qw(Devel::REPL::Plugin::Turtles);
+sub BEFORE_PLUGIN {
+    my $self = shift;
+    $self->load_plugin('Turtles');
+}
 
 sub expr_command_ppi {
   my ( $self, $eval, $code ) = @_;
@@ -24,17 +29,13 @@ __END__
 
 =pod
 
-=head1 NAME
-
-Devel::REPL::Plugin::PPI - PPI dumping of Perl code
-
 =head1 SYNOPSIS
 
   repl> #ppi Devel::REPL
   PPI::Document
     PPI::Statement
       PPI::Token::Word    'Devel::REPL'
-        
+
   repl> #ppi {
   > warn $];
   > }
@@ -62,5 +63,3 @@ L<Deve::REPL::Plugin::OutputCache> there is no new value in C<_>.
 Shawn M Moore E<lt>sartak@gmail.comE<gt>
 
 =cut
-
-