X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FDevel-REPL.git;a=blobdiff_plain;f=lib%2FDevel%2FREPL%2FPlugin%2FPackages.pm;h=2a1f539c4c17e72cc6fcde0c5bb74b20cc6e1bdc;hp=616d320cc32fde3bf5da85667bcf7dfab156f6df;hb=HEAD;hpb=aa8b764738156914d48d182ee0706e4c3d4e5c99 diff --git a/lib/Devel/REPL/Plugin/Packages.pm b/lib/Devel/REPL/Plugin/Packages.pm index 616d320..2a1f539 100644 --- a/lib/Devel/REPL/Plugin/Packages.pm +++ b/lib/Devel/REPL/Plugin/Packages.pm @@ -1,9 +1,14 @@ +use strict; +use warnings; package Devel::REPL::Plugin::Packages; -use Devel::REPL::Plugin; +# ABSTRACT: Keep track of which package the user is in + +our $VERSION = '1.003030'; +use Devel::REPL::Plugin; use namespace::autoclean; -use vars qw($PKG_SAVE); +our $PKG_SAVE; has 'current_package' => ( isa => 'Str', @@ -45,17 +50,9 @@ around 'eval' => sub { return $self->$orig(@args); }; -package Devel::REPL::Plugin::Packages::DefaultScratchpad; +package # hide from PAUSE + Devel::REPL::Plugin::Packages::DefaultScratchpad; # declare empty scratchpad package for cleanliness 1; - -__END__ - -=head1 NAME - -Devel::REPL::Plugin::Packages - Keep track of which package the user is in - -=cut -