diff options
author | Jesse Luehrs <doy@tozt.net> | 2013-06-03 15:54:25 -0500 |
---|---|---|
committer | Jesse Luehrs <doy@tozt.net> | 2013-06-03 15:54:25 -0500 |
commit | 45e08407c4d41765ab23df1c0a5f0c2e4bdc158a (patch) | |
tree | 8a43eb9785dc57b28d5c5eaf6a2205e53310a5f2 | |
parent | c82aea325cb2788dbc55a48c1bb78d306bab97df (diff) | |
download | reply-45e08407c4d41765ab23df1c0a5f0c2e4bdc158a.tar.gz reply-45e08407c4d41765ab23df1c0a5f0c2e4bdc158a.zip |
oops, undef is valid here
-rw-r--r-- | lib/Reply/Plugin/ReadLine.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Reply/Plugin/ReadLine.pm b/lib/Reply/Plugin/ReadLine.pm index 6fcb0ad..7c4ddd0 100644 --- a/lib/Reply/Plugin/ReadLine.pm +++ b/lib/Reply/Plugin/ReadLine.pm @@ -75,7 +75,7 @@ sub read_line { sub DESTROY { my $self = shift; - return if $self->{history_length} == 0; + return if defined $self->{history_length} && $self->{history_length} == 0; # XXX support more later return unless $self->{term}->ReadLine eq 'Term::ReadLine::Gnu'; |