diff options
author | jluehrs2 <jluehrs2@uiuc.edu> | 2008-05-26 15:26:25 -0500 |
---|---|---|
committer | jluehrs2 <jluehrs2@uiuc.edu> | 2008-05-26 15:26:25 -0500 |
commit | 919efcdf3ad6d542a1f67caef6f0d4a2df12b854 (patch) | |
tree | b53c8ed91740e9e54d6d224d6f21f2db446a38c5 | |
parent | 57bcfc526b4b89440dc9c78471ad5bd595519d94 (diff) | |
download | language-teco-919efcdf3ad6d542a1f67caef6f0d4a2df12b854.tar.gz language-teco-919efcdf3ad6d542a1f67caef6f0d4a2df12b854.zip |
just call try_cmd recursively here, no reason not to
-rw-r--r-- | lib/Language/TECO.pm | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/lib/Language/TECO.pm b/lib/Language/TECO.pm index 9ae78d5..affd767 100644 --- a/lib/Language/TECO.pm +++ b/lib/Language/TECO.pm @@ -198,8 +198,7 @@ sub try_cmd { $self->num(1); } $self->num(-$self->num); - $command = 'c'.$command; - $need_reset = 0; + $command = $self->try_cmd('c'.$command); } elsif ($command =~ s/^l//i) { if (!$self->has_num) { |