Changeset 1881

Timestamp:

11/28/06 18:37:40

Author:

miyagawa

Message:

Filter::EntryFullText?: grab title from TITLE tag, if title is not there ... this is a HACK. I would like to make it a separate plugin

Files:

• trunk/plagger/lib/Plagger/Plugin/Filter/EntryFullText.pm (modified) (3 diffs)

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

@@ -125 +125 @@
-
-    # use Last-Modified to populate entry date, even if handler doesn't find one
+    # TODO: make this a separate plugin
-    if ($res->last_modified && !$args->{entry}->date) {
-        $args->{entry}->date( Plagger::Date->from_epoch($res->last_modified) );
@@ -131 +132 @@
-    my @plugins = $handler ? ($handler) : @{ $self->{plugins} };
-
+    my $upgraded;
-    for my $plugin (@plugins) {
-        if ( $handler || $plugin->handle($args) ) {
@@ -157 +159 @@
-                }
-
-
+
+
-            }
-        }
-    }
+
+    # extract TITLE tag if title is not set yet
+    # TODO: make this a separate plugin
+    if (!$args->{entry}->title
+        and $args->{content} =~ m!<title>\s*(.*?)\s*</title>!is ) {
+        $args->{entry}->title( HTML::Entities::decode($1) );
+    }
+
+    return 1 if $upgraded;
-
-    # failed to extract: store whole HTML if the config is on