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=44aedb2f8627cf3e4adfcd9e493fc1bdce07f6dc;hp=5a5821404bd415bf5799b7e516448b23d12271bd;hb=54beb05dd302b5e166bf46c888318527e13375c7;hpb=c5bf3ed26017b944073c4328790f21686883eca9 diff --git a/lib/Devel/REPL/Plugin/PPI.pm b/lib/Devel/REPL/Plugin/PPI.pm index 5a58214..44aedb2 100644 --- a/lib/Devel/REPL/Plugin/PPI.pm +++ b/lib/Devel/REPL/Plugin/PPI.pm @@ -1,14 +1,18 @@ -#!/usr/bin/perl - +use strict; +use warnings; package Devel::REPL::Plugin::PPI; -use Devel::REPL::Plugin; +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 ) = @_; @@ -34,7 +38,7 @@ Devel::REPL::Plugin::PPI - PPI dumping of Perl code PPI::Document PPI::Statement PPI::Token::Word 'Devel::REPL' - + repl> #ppi { > warn $]; > }