From: Dan Boger Date: Mon, 14 Dec 2009 19:56:17 +0000 (-0800) Subject: Fix display of truncated native retweets X-Git-Url: https://git.sommitrealweird.co.uk/twirssi-net-twitter-lite.git/commitdiff_plain/9d8b25876e3edf09c253aeee91d91c10c13b4d82?hp=38ae1aaa3889bafda6825f0b0bbd3c3fc9f79d53 Fix display of truncated native retweets --- diff --git a/twirssi.pl b/twirssi.pl index 221e086..fd2a48f 100644 --- a/twirssi.pl +++ b/twirssi.pl @@ -1664,7 +1664,7 @@ sub get_text { my $text = decode_entities( $tweet->{text} ); if ( $tweet->{truncated} ) { if ( exists $tweet->{retweeted_status} ) { - $text = "RT $tweet->{retweeted_status}{user}{screen_name}: " + $text = "RT \@$tweet->{retweeted_status}{user}{screen_name}: " . "$tweet->{retweeted_status}{text}"; } elsif ( $object->isa('Net::Twitter') ) { $text .= " -- http://twitter.com/$tweet->{user}{screen_name}"