X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FDevel-REPL.git;a=blobdiff_plain;f=lib%2FDevel%2FREPL%2FPlugin%2FInterrupt.pm;h=1b2551e3b7fec2e3902cf633ae7710e308564d24;hp=d7d7d768714d60ed11f3e888c841b21157090da2;hb=6f4f9516b3422a8ce51b89b596fb808b197f833e;hpb=54fea9b0966ec7b5f91bc0567a41503c2e4e283b diff --git a/lib/Devel/REPL/Plugin/Interrupt.pm b/lib/Devel/REPL/Plugin/Interrupt.pm index d7d7d76..1b2551e 100644 --- a/lib/Devel/REPL/Plugin/Interrupt.pm +++ b/lib/Devel/REPL/Plugin/Interrupt.pm @@ -1,8 +1,10 @@ +use strict; +use warnings; package Devel::REPL::Plugin::Interrupt; use Devel::REPL::Plugin; use Sys::SigAction qw(set_sig_handler); -use namespace::clean -except => [ 'meta' ]; +use namespace::autoclean; around 'run' => sub { my ($orig, $self) = (shift, shift); @@ -60,8 +62,4 @@ can still use Ctrl-D to exit.) Shawn M Moore, C<< >> -=head1 CONTRIBUTORS - -Norbert Buchmuller C<< >> - =cut