Ignore:
Timestamp:
Dec 19, 2009, 9:58:49 PM (13 years ago)
Author:
Nelson Elhage <nelhage@mit.edu>
Branches:
master, release-1.7, release-1.8, release-1.9
Children:
22fce654
Parents:
9876953
git-author:
Nelson Elhage <nelhage@mit.edu> (12/19/09 18:57:20)
git-committer:
Nelson Elhage <nelhage@mit.edu> (12/19/09 21:58:49)
Message:
Add a twitter-retweet command
File:
1 edited

Legend:

Unmodified
Added
Removed
  • lib/BarnOwl/Module/Twitter/Handle.pm

    r9876953 r5214546  
    299299}
    300300
     301sub twitter_retweet {
     302    my $self = shift;
     303    my $msg = shift;
     304
     305    if($msg->service ne $self->{cfg}->{service}) {
     306        die("Cannot retweet a message from a different service.\n");
     307    }
     308    $self->twitter_command(retweet => $msg->{status_id});
     309}
     310
    301311sub twitter_follow {
    302312    my $self = shift;
Note: See TracChangeset for help on using the changeset viewer.