--- rxvt-unicode/src/perl/remote-clipboard 2012/06/06 15:06:41 1.6 +++ rxvt-unicode/src/perl/remote-clipboard 2012/06/10 13:58:06 1.8 @@ -1,7 +1,7 @@ #! perl -#:META:X_RESOURCE:%.store: the command used to store the selection -#:META:X_RESOURCE:%.fetch: the command used to fetch the selection +#:META:X_RESOURCE:%.store:string:the command used to store the selection +#:META:X_RESOURCE:%.fetch:string:the command used to fetch the selection use Fcntl (); @@ -87,10 +87,10 @@ sub on_start { my ($self) = @_; - $self->{store_cmd} = $self->x_resource ("remote-selection.store") + $self->{store_cmd} = $self->x_resource ("%.store") || "rsh ruth 'cat >/tmp/distributed-selection'"; - $self->{fetch_cmd} = $self->x_resource ("remote-selection.fetch") + $self->{fetch_cmd} = $self->x_resource ("%.fetch") || "rsh ruth 'cat /tmp/distributed-selection'"; push @{ $self->{term}{selection_popup_hook} }, sub {