X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FEval%2FWithLexicals.pm;h=79d88f0bb20e3464fd4b8c957dc76ebd8f158951;hb=refs%2Ftags%2Fv1.003000;hp=752de55660db68b4a9fd7e031e4507a4982130be;hpb=8d732f3064bb88d682504f365ef1af62c6598b8c;p=p5sagit%2FEval-WithLexicals.git diff --git a/lib/Eval/WithLexicals.pm b/lib/Eval/WithLexicals.pm index 752de55..79d88f0 100644 --- a/lib/Eval/WithLexicals.pm +++ b/lib/Eval/WithLexicals.pm @@ -4,7 +4,7 @@ use Moo; use Moo::Role (); use Sub::Quote; -our $VERSION = '1.001000'; # 1.1.0 +our $VERSION = '1.003000'; # 1.3.0 $VERSION = eval $VERSION; has lexicals => (is => 'rw', default => quote_sub q{ {} }); @@ -17,7 +17,7 @@ has lexicals => (is => 'rw', default => quote_sub q{ {} }); isa => sub { my ($val) = @_; die "Invalid context type $val - should be list, scalar or void" - unless $valid_contexts{$val}; + unless $valid_contexts{$val}; }, ); } @@ -137,6 +137,9 @@ sub _eval_do { } } +1; +__END__ + =head1 NAME Eval::WithLexicals - pure perl eval with persistent lexical variables @@ -259,6 +262,8 @@ Matt S. Trout David Leadbeater +haarg - Graham Knop (cpan:HAARG) + =head1 COPYRIGHT Copyright (c) 2010 the Eval::WithLexicals L and L @@ -270,5 +275,3 @@ This library is free software and may be distributed under the same terms as perl itself. =cut - -1;