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 (parent:
5716c1e
)
1.7.2 - r349 - Fix display of debug: messages in the console
author
Dan Boger
<zigdon@irc.peeron.com>
Thu, 8 Jan 2009 20:52:48 +0000
(12:52 -0800)
committer
Dan Boger
<zigdon@irc.peeron.com>
Thu, 8 Jan 2009 20:52:48 +0000
(12:52 -0800)
twirssi.pl
patch
|
blob
|
history
diff --git
a/twirssi.pl
b/twirssi.pl
index af376162d800d247d26ed459d2dc66053de8d847..0a170cb67725831648236ff5e9c22d1d5a364e85 100644
(file)
--- a/
twirssi.pl
+++ b/
twirssi.pl
@@
-12,7
+12,7
@@
$Data::Dumper::Indent = 1;
use vars qw($VERSION %IRSSI);
$VERSION = "1.7.2";
use vars qw($VERSION %IRSSI);
$VERSION = "1.7.2";
-my ($REV) = '$Rev: 34
8
$' =~ /(\d+)/;
+my ($REV) = '$Rev: 34
9
$' =~ /(\d+)/;
%IRSSI = (
authors => 'Dan Boger',
contact => 'zigdon@gmail.com',
%IRSSI = (
authors => 'Dan Boger',
contact => 'zigdon@gmail.com',
@@
-21,7
+21,7
@@
my ($REV) = '$Rev: 348 $' =~ /(\d+)/;
. 'Can optionally set your bitlbee /away message to same',
license => 'GNU GPL v2',
url => 'http://tinyurl.com/twirssi',
. 'Can optionally set your bitlbee /away message to same',
license => 'GNU GPL v2',
url => 'http://tinyurl.com/twirssi',
- changed => '$Date: 2009-01-06 11:
09:34
-0800 (Tue, 06 Jan 2009) $',
+ changed => '$Date: 2009-01-06 11:
16:45
-0800 (Tue, 06 Jan 2009) $',
);
my $window;
);
my $window;
@@
-767,8
+767,9
@@
sub monitor_child {
last if /^__friends__/;
my %meta;
foreach my $key (qw/id account nick type/) {
last if /^__friends__/;
my %meta;
foreach my $key (qw/id account nick type/) {
- s/^$key:(\S+)\s*//;
- $meta{$key} = $1;
+ if (s/^$key:(\S+)\s*//) {
+ $meta{$key} = $1;
+ }
}
next if exists $meta{id} and exists $tweet_cache{ $meta{id} };
}
next if exists $meta{id} and exists $tweet_cache{ $meta{id} };