… | |
… | |
44 | refresh_begin => \&refresh, |
44 | refresh_begin => \&refresh, |
45 | refresh_end => \&refresh, |
45 | refresh_end => \&refresh, |
46 | ); |
46 | ); |
47 | |
47 | |
48 | $self->{manpage_overlay} = $self->overlay (0, -2, $self->ncol, 1, urxvt::OVERLAY_RSTYLE, 0); |
48 | $self->{manpage_overlay} = $self->overlay (0, -2, $self->ncol, 1, urxvt::OVERLAY_RSTYLE, 0); |
49 | $self->{manpage_overlay}->set (0, 0, "scrollback search, see man ${urxvt::RXVTNAME}perl"); |
49 | $self->{manpage_overlay}->set (0, 0, "scrollback search, see the ${urxvt::RXVTNAME}perl manpage for details"); |
50 | |
50 | |
51 | $self->idle; |
51 | $self->idle; |
52 | } |
52 | } |
53 | |
53 | |
54 | sub leave { |
54 | sub leave { |
… | |
… | |
131 | return; |
131 | return; |
132 | } |
132 | } |
133 | |
133 | |
134 | } else { |
134 | } else { |
135 | if ($keysym == 0xff0d || $keysym == 0xff8d) { |
135 | if ($keysym == 0xff0d || $keysym == 0xff8d) { |
136 | # OK |
136 | # TODO: set selection |
137 | $self->leave; |
137 | $self->leave; |
138 | } elsif ($keysym == 0xff1b) { |
138 | } elsif ($keysym == 0xff1b) { |
139 | $self->view_start ($self->{view_start}); |
139 | $self->view_start ($self->{view_start}); |
140 | $self->leave; |
140 | $self->leave; |
141 | } elsif ($keysym == 0xff52) { |
141 | } elsif ($keysym == 0xff52) { |