summaryrefslogtreecommitdiffstats
path: root/lib/Language/TECO.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Language/TECO.pm')
-rw-r--r--lib/Language/TECO.pm9
1 files changed, 9 insertions, 0 deletions
diff --git a/lib/Language/TECO.pm b/lib/Language/TECO.pm
index 33da8b3..7d2d63e 100644
--- a/lib/Language/TECO.pm
+++ b/lib/Language/TECO.pm
@@ -195,6 +195,15 @@ sub execute {
$self->push_cmd('c');
redo;
}
+ elsif (/l/i) {
+ $self->cmd(sub {
+ my $self = shift;
+ if (!defined $self->num) {
+ $self->num(1);
+ }
+ $self->{buffer}->set(scalar $self->{buffer}->get_line_offset($self->num));
+ });
+ }
elsif (/t/i) {
$self->cmd(sub {
my $self = shift;