X-Git-Url: http://lab.mitty.jp/git/?a=blobdiff_plain;f=twitter%2Ftwitterbot.pl;h=d1dd229f24d99da5b9d97e4a7767b4ff33aafd42;hb=567a134d7d421d2c54b5fff0ed25d9a5514d2285;hp=eb9079d22b33ae7fa9dff1d0be555d202cb8e64c;hpb=f3ef4f6728c7e6bfbd340eadb7baef02f20d4697;p=lab.git diff --git a/twitter/twitterbot.pl b/twitter/twitterbot.pl index eb9079d..d1dd229 100755 --- a/twitter/twitterbot.pl +++ b/twitter/twitterbot.pl @@ -155,9 +155,11 @@ sub or_search { screen_name => $res->{user}{screen_name}, status_id => $res->{id}, text => $res->{text}, + user_id => $res->{user}{id}, }; if ($res->{retweeted_status}) { - $id->{type} = 'retweet'; + $id->{retweet_of} = $res->{retweeted_status}{id}; + $id->{type} = 'retweet'; } else { $id->{type} = 'search'; @@ -206,6 +208,7 @@ sub mentions_ids { status_id => $_->{id}, text => $_->{text}, type => 'mention', + user_id => $_->{user}{id}, } } @{$res} };