*** empty log message ***

diff --git a/src/perl/searchable-scrollback b/src/perl/searchable-scrollback
index 49b3e6265e65b11f320d6e4086fda72df6e0b153..2e2fc2fcf909ec2d8769b6f4c6724989f5ec6680 100644 (file)
--- a/src/perl/searchable-scrollback
+++ b/src/perl/searchable-scrollback
@@ -92,7 +92,7 @@ sub search {
             } while $text =~ /$re/g;
 
             $self->{row} = $row;
-            $self->view_start (-$row + ($self->nrow >> 1));
+            $self->view_start (List::Util::max 0, -$row + ($self->nrow >> 1));
             $self->want_refresh;
             last;
          }

diff --git a/src/rxvtperl.xs b/src/rxvtperl.xs
index d5f901a360f1604e6f3307321d82e6c48cab31fc..20d6f07de0b62c43c17303caabce82303a5962d7 100644 (file)
--- a/src/rxvtperl.xs
+++ b/src/rxvtperl.xs
@@ -1047,6 +1047,7 @@ rxvt_term::rstyle (U32 new_rstyle = THIS->rstyle)
 
 int
 rxvt_term::view_start (int newval = -1)
+       PROTOTYPE: $;$
        CODE:
 {
         RETVAL = THIS->view_start;