--- rxvt-unicode/src/perl/selection 2011/03/13 17:07:36 1.53 +++ rxvt-unicode/src/perl/selection 2012/06/06 15:06:41 1.54 @@ -1,5 +1,7 @@ #! perl +#:META:X_RESOURCE:%.pattern-0:string:first selection pattern + sub on_user_command { my ($self, $cmd) = @_;