From 9d8b25876e3edf09c253aeee91d91c10c13b4d82 Mon Sep 17 00:00:00 2001
From: Dan Boger <zigdon@irc.peeron.com>
Date: Mon, 14 Dec 2009 11:56:17 -0800
Subject: [PATCH] Fix display of truncated native retweets
---
twirssi.pl | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
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}"
--
2.39.5