| … | … | ||
|---|---|---|---|
| 98 | }; | 98 | }; |
| 99 | 99 | ||
| 100 | () | 100 | () |
| 101 | } | 101 | } |
| 102 | 102 | ||
| 103 | sub on_user_command { | ||
| 104 | my ($self, $cmd) = @_; | ||
| 105 | 103 | ||
| 106 | if ($cmd eq "selection-pastebin:remote-pastebin") { | ||
| 107 | $self->upload_paste; | ||
| 108 | } | ||
| 109 | |||
| 110 | () | ||
| 111 | } | ||
| 112 |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |