ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/perl/searchable-scrollback
(Generate patch)

Comparing rxvt-unicode/src/perl/searchable-scrollback (file contents):
Revision 1.22 by root, Thu Jul 6 18:56:10 2006 UTC vs.
Revision 1.24 by root, Sun Nov 11 04:08:00 2007 UTC

35 my ($self) = @_; 35 my ($self) = @_;
36 36
37 return if $self->{overlay}; 37 return if $self->{overlay};
38 38
39 $self->{view_start} = $self->view_start; 39 $self->{view_start} = $self->view_start;
40 $self->{pty_ev_events} = $self->pty_ev_events (urxvt::EVENT_NONE); 40 $self->{pty_ev_events} = $self->pty_ev_events (urxvt::EV_NONE);
41 $self->{row} = $self->nrow - 1; 41 $self->{row} = $self->nrow - 1;
42 $self->{search} = "(?i)"; 42 $self->{search} = "(?i)";
43 43
44 $self->enable ( 44 $self->enable (
45 key_press => \&key_press, 45 key_press => \&key_press,
123 my ($self, $event, $keysym, $string) = @_; 123 my ($self, $event, $keysym, $string) = @_;
124 124
125 delete $self->{manpage_overlay}; 125 delete $self->{manpage_overlay};
126 126
127 if ($keysym == 0xff0d || $keysym == 0xff8d) { # enter 127 if ($keysym == 0xff0d || $keysym == 0xff8d) { # enter
128 if ($self->{found}) { 128 if ($self->{found} && $event->{state} & urxvt::ShiftMask) {
129 my ($br, $bc, $er, $ec) = @{ $self->{found}[0] }; 129 my ($br, $bc, $er, $ec) = @{ $self->{found}[0] };
130 $self->selection_beg ($br, $bc); 130 $self->selection_beg ($br, $bc);
131 $self->selection_end ($er, $ec); 131 $self->selection_end ($er, $ec);
132 $self->selection_make ($event->{time}); 132 $self->selection_make ($event->{time});
133 } 133 }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines