… | |
… | |
4 | |
4 | |
5 | #:META:RESOURCE:%:string:activation hotkey keysym |
5 | #:META:RESOURCE:%:string:activation hotkey keysym |
6 | |
6 | |
7 | =head1 NAME |
7 | =head1 NAME |
8 | |
8 | |
9 | searchable-scrollback - incremental scrollback search (enabled by default) |
9 | searchable-scrollback - incremental scrollback search |
10 | |
10 | |
11 | =head1 DESCRIPTION |
11 | =head1 DESCRIPTION |
12 | |
12 | |
13 | Adds regex search functionality to the scrollback buffer, triggered by |
13 | Adds regex search functionality to the scrollback buffer, triggered by |
14 | the C<searchable-scrollback:start> action (bound to C<M-s> by |
14 | the C<searchable-scrollback:start> action (bound to C<M-s> by |
… | |
… | |
242 | |
242 | |
243 | sub tt_write { |
243 | sub tt_write { |
244 | my ($self, $data) = @_; |
244 | my ($self, $data) = @_; |
245 | |
245 | |
246 | $self->{search} .= $self->locale_decode ($data); |
246 | $self->{search} .= $self->locale_decode ($data); |
|
|
247 | $self->{search} =~ s/\e\[20[01]~//g; |
247 | |
248 | |
248 | $self->{search} =~ s/^\(\?i\)// |
249 | $self->{search} =~ s/^\(\?i\)// |
249 | if $self->{search} =~ /^\(.*[[:upper:]]/; |
250 | if $self->{search} =~ /^\(.*[[:upper:]]/; |
250 | |
251 | |
251 | delete $self->{found}; |
252 | delete $self->{found}; |