+use strict;
+use warnings;
package Devel::REPL::Plugin::Nopaste;
use Devel::REPL::Plugin;
-use MooseX::AttributeHelpers;
-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 {
}
has complete_session => (
- metaclass => 'String',
+ traits => ['String'],
is => 'rw',
isa => 'Str',
lazy => 1,
default => '',
- provides => {
- append => 'add_to_session',
+ handles => {
+ add_to_session => 'append',
},
);
C<#pastetitle example of some code>
-defaults to 'Devel::REPL session'
+defaults to C<'Devel::REPL session'>.
=head1 CONFIGURATION
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<Devel::REPL> session, but only affect
the future parts of the session, not the past parts.
=head1 AUTHOR