--- rxvt-unicode/src/perl/searchable-scrollback 2010/04/01 18:36:23 1.25 +++ rxvt-unicode/src/perl/searchable-scrollback 2012/06/10 13:58:06 1.28 @@ -2,11 +2,13 @@ # this extension implements scrollback buffer search +#:META:X_RESOURCE:%:string:activation hotkey keysym + sub on_init { my ($self) = @_; my $hotkey = $self->{argv}[0] - || $self->x_resource ("searchable-scrollback") + || $self->x_resource ("%") || "M-s"; $self->parse_keysym ($hotkey, "perl:searchable-scrollback:start") @@ -162,7 +164,7 @@ $self->{search} =~ s/^\(\?i\)// if $self->{search} =~ /^\(.*[[:upper:]]/; - + $self->search (-1); $self->idle;