From 249c7b5dc579847be9836aae3d31aa3ac247ee97 Mon Sep 17 00:00:00 2001
From: jluehrs2 <jluehrs2@uiuc.edu>
Date: Thu, 22 May 2008 14:49:45 -0500
Subject: handle context correctly for ->num

---
 lib/Language/TECO.pm | 4 ++--
 1 file 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) {
-- 
cgit v1.2.3-54-g00ecf