--- rxvt-unicode/src/perl/selection-pastebin 2014/05/31 08:33:47 1.25 +++ rxvt-unicode/src/perl/selection-pastebin 2014/06/09 19:54:26 1.26 @@ -115,6 +115,16 @@ () } +sub on_user_command { + my ($self, $cmd) = @_; + + if ($cmd eq "selection-pastebin:remote-pastebin") { + $self->upload_paste; + } + + () +} + sub on_action { my ($self, $action) = @_;