Changes in perl/modules/Twitter/lib/BarnOwl/Module/Twitter/Handle.pm [5d59c1e:a2640485]

File:

• perl/modules/Twitter/lib/BarnOwl/Module/Twitter/Handle.pm (modified) (1 diff)

perl/modules/Twitter/lib/BarnOwl/Module/Twitter/Handle.pm

@@ -248 +248 @@
                 next;
             }
-            my $orig = $tweet->{retweeted_status};
-            $orig = $tweet unless defined($orig);
-
             my $msg = BarnOwl::Message->new(
                 type      => 'Twitter',
-                sender    => $orig->{user}{screen_name},
+                sender    => $tweet->{user}{screen_name},
                 recipient => $self->{cfg}->{user} || $self->{user},
                 direction => 'in',
-                source    => decode_entities($orig->{source}),
-                location  => decode_entities($orig->{user}{location}||""),
-                body      => decode_entities($orig->{text}),
+                source    => decode_entities($tweet->{source}),
+                location  => decode_entities($tweet->{user}{location}||""),
+                body      => decode_entities($tweet->{text}),
                 status_id => $tweet->{id},
                 service   => $self->{cfg}->{service},
                 account   => $self->{cfg}->{account_nickname},
-                $tweet->{retweeted_status} ? (retweeted_by => $tweet->{user}{screen_name}) : ()
                );
             BarnOwl::queue_message($msg);