--- rxvt-unicode/src/perl/matcher	2022/12/09 05:06:46	1.40
+++ rxvt-unicode/src/perl/matcher	2023/05/28 10:40:41	1.41
@@ -222,22 +222,19 @@
 }
 
 sub most_recent {
-   my ($self) = shift;
+   my ($self) = @_;
    my $row = $self->nrow - 1;
-   my @exec;
 
    while ($row >= $self->top_row) {
       my $line = $self->line ($row);
-      @exec = $self->command_for ($row);
-      last if @exec;
+      my @exec = $self->command_for ($row);
+      if (@exec) {
+         return $self->exec_async (@exec);
+      }
 
       $row = $line->beg - 1;
    }
 
-   if (@exec) {
-      return $self->exec_async (@exec);
-   }
-
    ()
 }