X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FDevel-REPL.git;a=blobdiff_plain;f=lib%2FDevel%2FREPL%2FPlugin%2FNopaste.pm;h=d37734097d02d054cd4dc45eb6ae4c528246d1ea;hp=16fcd8f71360c423027e3e5858da7075c0e46966;hb=HEAD;hpb=8bf7245015d1b51f0c798f46e4ca3d823caab814 diff --git a/lib/Devel/REPL/Plugin/Nopaste.pm b/lib/Devel/REPL/Plugin/Nopaste.pm index 16fcd8f..d377340 100644 --- a/lib/Devel/REPL/Plugin/Nopaste.pm +++ b/lib/Devel/REPL/Plugin/Nopaste.pm @@ -1,8 +1,13 @@ +use strict; +use warnings; package Devel::REPL::Plugin::Nopaste; +# ABSTRACT: #nopaste to upload session's input and output + +our $VERSION = '1.003030'; use Devel::REPL::Plugin; -use Moose::Util::TypeConstraints; -use namespace::clean -except => [ 'meta' ]; +use Moose::Util::TypeConstraints 'enum'; +use namespace::autoclean; use Scalar::Util qw(blessed); sub BEFORE_PLUGIN { @@ -11,7 +16,7 @@ sub BEFORE_PLUGIN { } has complete_session => ( - metaclass => 'String', + traits => ['String'], is => 'rw', isa => 'Str', lazy => 1, @@ -94,9 +99,7 @@ sub command_pastetitle { __END__ -=head1 NAME - -Devel::REPL::Plugin::Nopaste - #nopaste to upload session's input and output +=pod =head1 COMMANDS @@ -114,7 +117,7 @@ the nopaste site. For example: C<#pastetitle example of some code> -defaults to 'Devel::REPL session' +defaults to C<'Devel::REPL session'>. =head1 CONFIGURATION @@ -132,7 +135,7 @@ The default of commenting out the output would be set like this: C<< $_REPL->nopaste_format( 'comment_output' ); >> -These options can be set during a Devel::REPL session, but only affect +These options can be set during a L session, but only affect the future parts of the session, not the past parts. =head1 AUTHOR @@ -148,4 +151,3 @@ Shawn M Moore, C<< >> =back =cut -