Changeset 452

Timestamp:

04/01/06 15:42:04

Author:

ko

Message:

skip for duplicate url

Files:

• trunk/plagger/lib/Plagger/Plugin/Subscription/PingServer.pm (modified) (2 diffs)

trunk/plagger/lib/Plagger/Plugin/Subscription/PingServer.pm

@@ -23 +23 @@
-       $servers = [ $servers ] unless ref $servers;
-
+    my %cache;
-    for my $server (@{ $servers }) {
-        my $agent    = Plagger::UserAgent->new;
@@ -39 +40 @@
-            my $url = first { $_ } $node->findvalue('@url');
-            next unless $url;
+            next if $cache{$url}++;
-            $context->log(debug => "get url: $url");
-