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:
4d57961
)
r492 - don't show duplicates from the same file (such as search results/follow overlaps)
author
Dan Boger
<zigdon@irc.peeron.com>
Wed, 25 Feb 2009 22:40:35 +0000
(14:40 -0800)
committer
Dan Boger
<zigdon@irc.peeron.com>
Wed, 25 Feb 2009 22:40:35 +0000
(14:40 -0800)
twirssi.pl
patch
|
blob
|
history
diff --git
a/twirssi.pl
b/twirssi.pl
index 0ee8ab107f96a7384b6a6e25f54447685434fb0d..8ab31804b824c0a97d6825b2a6b11a30a5ba2a2b 100644
(file)
--- a/
twirssi.pl
+++ b/
twirssi.pl
@@
-12,7
+12,7
@@
$Data::Dumper::Indent = 1;
use vars qw($VERSION %IRSSI);
$VERSION = "2.1.1beta";
use vars qw($VERSION %IRSSI);
$VERSION = "2.1.1beta";
-my ($REV) = '$Rev: 49
1
$' =~ /(\d+)/;
+my ($REV) = '$Rev: 49
2
$' =~ /(\d+)/;
%IRSSI = (
authors => 'Dan Boger',
contact => 'zigdon@gmail.com',
%IRSSI = (
authors => 'Dan Boger',
contact => 'zigdon@gmail.com',
@@
-21,7
+21,7
@@
my ($REV) = '$Rev: 491 $' =~ /(\d+)/;
. 'Can optionally set your bitlbee /away message to same',
license => 'GNU GPL v2',
url => 'http://twirssi.com',
. 'Can optionally set your bitlbee /away message to same',
license => 'GNU GPL v2',
url => 'http://twirssi.com',
- changed => '$Date: 2009-02-25 1
0:44:26
-0800 (Wed, 25 Feb 2009) $',
+ changed => '$Date: 2009-02-25 1
4:39:58
-0800 (Wed, 25 Feb 2009) $',
);
my $window;
);
my $window;
@@
-868,6
+868,10
@@
sub monitor_child {
}
if ( not $meta{type} or $meta{type} ne 'searchid' ) {
}
if ( not $meta{type} or $meta{type} ne 'searchid' ) {
+ if ( exists $meta{id} and exists $new_cache{ $meta{id} } ) {
+ next;
+ }
+
$new_cache{ $meta{id} } = time;
if ( exists $meta{id} and exists $tweet_cache{ $meta{id} } ) {
$new_cache{ $meta{id} } = time;
if ( exists $meta{id} and exists $tweet_cache{ $meta{id} } ) {