X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FDevel-REPL.git;a=blobdiff_plain;f=lib%2FDevel%2FREPL%2FPlugin%2FPPI.pm;h=cb848610736df14aa84cda0526ff3df80a13dc1e;hp=5a5821404bd415bf5799b7e516448b23d12271bd;hb=9d2a4940f5958d82828272364ef754e9290b6113;hpb=c5bf3ed26017b944073c4328790f21686883eca9

diff --git a/lib/Devel/REPL/Plugin/PPI.pm b/lib/Devel/REPL/Plugin/PPI.pm
index 5a58214..cb84861 100644
--- 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
-
-