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

#! perl

=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.3
Committed:	Wed Jun 23 12:48:13 2021 UTC (2 years, 10 months ago) by root
Branch:	MAIN
CVS Tags:	rxvt-unicode-rel-9_29, rxvt-unicode-rel-9_30, HEAD
Changes since 1.2:	+1 -1 lines
Log Message:	* empty log message *
#	Content
1	#! perl
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