From: Dan Boger <zigdon@irc.peeron.com>
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?ds=inline;hp=-c

Fix display of truncated native retweets
---

9d8b25876e3edf09c253aeee91d91c10c13b4d82
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}"