[ViewVC] Contents of: cvs/rxvt-unicode/src/perl/selection-to-clipboard

#! 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);

   ()
}

Revision:	1.2
Committed:	Sun Apr 13 19:29:54 2014 UTC (10 years, 2 months ago) by sf-exg
Branch:	MAIN
CVS Tags:	rxvt-unicode-rel-9_26, rxvt-unicode-rel-9_25, rxvt-unicode-rel-9_22, rxvt-unicode-rel-9_20, rxvt-unicode-rel-9_21
Changes since 1.1:	+2 -2 lines
Log Message:	Fix typos.
#	Content
1	#! perl -w
2
3	=head1 NAME
4
5	selection-to-clipboard - copy the selection to the clipboard each time a selection is made
6
7	=head1 SYNOPSIS
8
9	urxvt -pe selection-to-clipboard
10
11	=head1 DESCRIPTION
12
13	This very simple extension copies the selection to the clipboard every
14	time a selection is made. This, in effect, synchronises the clipboard with
15	the selection for selections done by rxvt-unicode.
16
17	=cut
18
19	sub on_sel_grab {
20	my ($self, $time) = @_;
21
22	$self->selection ($self->selection, 1);
23	$self->selection_grab ($time, 1);
24
25	()
26	}
27