#! perl -w
=head1 NAME
selection-to-clipboard - copy the selection to the clipboard each time a selection is made
=head1 SYNOPSIS
urxvt -pe selection-to-clipboard
=head1 DESCRIPTION
This very simple extension copies the selection to the clipboard every
time a selection is made. This, in effect, synchronises the clipboard with
the selection for selections done by rxvt-unicode.
=cut
sub on_sel_grab {
my ($self, $time) = @_;
$self->selection ($self->selection, 1);
$self->selection_grab ($time, 1);
()
}