projects
/
twirssi-net-twitter-lite.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(from parent 1:
38ae1aa
)
Fix display of truncated native retweets
author
Dan Boger
<zigdon@irc.peeron.com>
Mon, 14 Dec 2009 19:56:17 +0000
(11:56 -0800)
committer
Dan Boger
<zigdon@irc.peeron.com>
Mon, 14 Dec 2009 19:56:17 +0000
(11:56 -0800)
twirssi.pl
patch
|
blob
|
history
diff --git
a/twirssi.pl
b/twirssi.pl
index 221e086162972b15a0bd4a4cf19a1c5d5a7be20e..fd2a48fffe0bcbd651c954942c0841b2a1213fa7 100644
(file)
--- 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}"