Changeset 5da6ed8 for lib/BarnOwl
- Timestamp:
- Jul 31, 2009, 1:50:06 AM (16 years ago)
- Branches:
- master, release-1.10, release-1.7, release-1.8, release-1.9
- Children:
- 82e0f26
- Parents:
- 0b13bbc
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
lib/BarnOwl/Module/Twitter/Handle.pm
r0b13bbc r5da6ed8 38 38 poll_for_dms => 1, 39 39 publish_tweets => 1, 40 show_unsubscribed_replies => 1, 40 41 %$cfg 41 42 }; … … 111 112 return; 112 113 }; 114 115 if ($self->{cfg}->{show_unsubscribed_replies}) { 116 my $mentions = $self->{twitter}->mentions( { since_id => $self->{last_id} } ); 117 unless (defined($mentions) && ref($mentions) eq 'ARRAY') { 118 $self->twitter_error(); 119 return; 120 }; 121 #combine, sort by id, and uniq 122 push @$timeline, @$mentions; 123 @$timeline = sort { $b->{id} <=> $a->{id} } @$timeline; 124 my $prev = { id => 0 }; 125 @$timeline = grep($_->{id} != $prev->{id} && (($prev) = $_), @$timeline); 126 } 127 113 128 if ( scalar @$timeline ) { 114 129 for my $tweet ( reverse @$timeline ) {
Note: See TracChangeset
for help on using the changeset viewer.