ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/perl/selection-pastebin
(Generate patch)

Comparing rxvt-unicode/src/perl/selection-pastebin (file contents):
Revision 1.7 by root, Wed Jan 18 10:39:20 2006 UTC vs.
Revision 1.8 by root, Wed Jan 18 11:05:09 2006 UTC

41 $ov->set (0, 0, $msg); 41 $ov->set (0, 0, $msg);
42 42
43 my $timer; $timer = 43 my $timer; $timer =
44 urxvt::timer 44 urxvt::timer
45 ->new 45 ->new
46 ->start (urxvt::NOW + 5) 46 ->after (5)
47 ->cb (sub {undef $timer; undef $ov; }); 47 ->cb (sub {undef $timer; undef $ov; });
48} 48}
49 49
50sub on_start { 50sub on_start {
51 my ($self) = @_; 51 my ($self) = @_;

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines