--- rxvt-unicode/src/perl/selection-pastebin	2006/01/18 10:39:20	1.7
+++ rxvt-unicode/src/perl/selection-pastebin	2006/01/19 16:07:09	1.9
@@ -43,7 +43,7 @@
    my $timer; $timer =
       urxvt::timer
               ->new
-              ->start (urxvt::NOW + 5)
+              ->after (5)
               ->cb (sub {undef $timer; undef $ov; });
 }
 
@@ -55,13 +55,13 @@
    $pastebin_url = $self->x_resource ("selection-pastebin.url")
                    || "http://www.ta-sa.org/files/txt/%";
 
-   push @urxvt::ext::selection_popup::hook, sub {
-      ("pastebin upload" => sub { $self->upload_paste })
-   };
-
    ()
 }
 
+push @urxvt::ext::selection_popup::hook, sub {
+   ("pastebin upload" => sub { $self->upload_paste })
+};
+
 sub on_keyboard_command {
    my ($self, $cmd) = @_;