X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FDevel-REPL.git;a=blobdiff_plain;f=lib%2FDevel%2FREPL%2FPlugin%2FHistory.pm;h=31baf26adb7de3bd49ed2f2fc71d885df1c22dc1;hp=8d77d05ddfaabe9cdcfeadd17cec5b068f2fd256;hb=77327851f87a17466307e8fccdbf2e0d3c2e58dc;hpb=aa8b764738156914d48d182ee0706e4c3d4e5c99 diff --git a/lib/Devel/REPL/Plugin/History.pm b/lib/Devel/REPL/Plugin/History.pm index 8d77d05..31baf26 100644 --- a/lib/Devel/REPL/Plugin/History.pm +++ b/lib/Devel/REPL/Plugin/History.pm @@ -1,16 +1,23 @@ +use strict; +use warnings; package Devel::REPL::Plugin::History; +# ABSTRACT: Keep track of all input, provide shortcuts !1, !-1 + +our $VERSION = '1.003030'; use Devel::REPL::Plugin; use namespace::autoclean; has 'history' => ( - isa => 'ArrayRef', is => 'rw', required => 1, lazy => 1, + isa => 'ArrayRef', is => 'rw', + lazy => 1, default => sub { [] } ); # lazy so ReadLineHistory Plugin can set this has 'have_readline_history' => ( - is => 'rw', required => 1, lazy => 1, + is => 'rw', + lazy => 1, default => sub { 0 } ); @@ -65,12 +72,3 @@ sub history_call { }; 1; - -__END__ - -=head1 NAME - -Devel::REPL::Plugin::History - Keep track of all input, provide shortcuts !1, !-1 - -=cut -