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=064c3fab5efec584fbf3b2cbf01f0fbb5790623d;hp=616d320cc32fde3bf5da85667bcf7dfab156f6df;hb=796cd7ec80de14e45ca8221d545aceb7b9bc0b71;hpb=aa8b764738156914d48d182ee0706e4c3d4e5c99 diff --git a/lib/Devel/REPL/Plugin/Packages.pm b/lib/Devel/REPL/Plugin/Packages.pm index 616d320..064c3fa 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.003027'; +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 -