| … | |
… | |
| 220 | |
220 | |
| 221 | $self->enable (key_press => \&matchlist_key_press); |
221 | $self->enable (key_press => \&matchlist_key_press); |
| 222 | } |
222 | } |
| 223 | |
223 | |
| 224 | sub most_recent { |
224 | sub most_recent { |
| 225 | my ($self) = shift; |
225 | my ($self) = @_; |
| 226 | my $row = $self->nrow - 1; |
226 | my $row = $self->nrow - 1; |
| 227 | my @exec; |
|
|
| 228 | |
227 | |
| 229 | while ($row >= $self->top_row) { |
228 | while ($row >= $self->top_row) { |
| 230 | my $line = $self->line ($row); |
229 | my $line = $self->line ($row); |
| 231 | @exec = $self->command_for ($row); |
230 | my @exec = $self->command_for ($row); |
| 232 | last if @exec; |
231 | if (@exec) { |
|
|
232 | return $self->exec_async (@exec); |
|
|
233 | } |
| 233 | |
234 | |
| 234 | $row = $line->beg - 1; |
235 | $row = $line->beg - 1; |
| 235 | } |
|
|
| 236 | |
|
|
| 237 | if (@exec) { |
|
|
| 238 | return $self->exec_async (@exec); |
|
|
| 239 | } |
236 | } |
| 240 | |
237 | |
| 241 | () |
238 | () |
| 242 | } |
239 | } |
| 243 | |
240 | |
