--- rxvt-unicode/src/perl/matcher 2014/06/22 07:51:21 1.31 +++ rxvt-unicode/src/perl/matcher 2014/07/30 15:22:51 1.32 @@ -189,11 +189,14 @@ sub most_recent { my ($self) = shift; - my $row = $self->nrow; + my $row = $self->nrow - 1; my @exec; - while($row-- > $self->top_row) { + while ($row >= $self->top_row) { + my $line = $self->line ($row); @exec = $self->command_for($row); last if(@exec); + + $row = $line->beg - 1; } if(@exec) { return $self->exec_async (@exec);