diff options
-rw-r--r-- | lib/Language/TECO.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Language/TECO.pm b/lib/Language/TECO.pm index 6a9ffb0..33da8b3 100644 --- a/lib/Language/TECO.pm +++ b/lib/Language/TECO.pm @@ -40,7 +40,7 @@ sub num { $self->{$self->{current_num}} = $num; } else { - if (wantarray) { + if (wantarray && defined $self->{n2}) { return ($self->{n1}, $self->{n2}); } else { @@ -158,7 +158,7 @@ sub execute { $self->cmd(sub { my $self = shift; if (defined $self->{n2}) { - $self->{buffer}->delete(($self->num)); + $self->{buffer}->delete($self->num); } else { if (!defined $self->num) { |