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'; |