Changeset 1193

Timestamp:

08/01/06 16:21:04

Author:

miyagawa

Message:

make looks_like_feed() more generous. Stripped warnings in EFT

Files:

• trunk/plagger/lib/Plagger/Plugin/Aggregator/Simple.pm (modified) (1 diff)
• trunk/plagger/lib/Plagger/Plugin/Filter/EntryFullText.pm (modified) (1 diff)
• trunk/plagger/t/regression/run_hook_once.t (modified) (1 diff)
• trunk/plagger/t/regression/weird-rdf-html.t (added)

trunk/plagger/lib/Plagger/Plugin/Aggregator/Simple.pm

@@ -54 +54 @@
-sub looks_like_feed {
-    my($self, $content_ref) = @_;
-
+.*?
-}
-

trunk/plagger/lib/Plagger/Plugin/Filter/EntryFullText.pm

@@ -180 +180 @@
-    # add ^ if handle method starts with http://
-    for my $key ( qw(custom_feed_handle handle handle_force) ) {
+        next unless defined $data->{$key};
-        $data->{$key} = "^$data->{$key}" if $data->{$key} =~ m!^https?://!;
-    }

trunk/plagger/t/regression/run_hook_once.t

@@ -3 +3 @@
-use t::TestPlagger;
-
+test_requires_network;
-plan 'no_plan';
-run_eval_expected;