Changeset 58

Timestamp:

02/08/06 21:44:53

Author:

miyagawa

Message:

Allow 'title' option, and if there's not, generate better title

Files:

• trunk/plagger/lib/Plagger/Plugin/Splice/Tag.pm (modified) (2 diffs)

trunk/plagger/lib/Plagger/Plugin/Splice/Tag.pm

@@ -22 +22 @@
-    $feed->type('spliced:tag');
-    $feed->id( $self->conf->{id} || ('spliced:tag:' . join('+', @tags)) );
+    $feed->title( $self->conf->{title} || $self->gen_title($op, @tags) );
-
-    for my $f ($context->update->feeds) {
@@ -38 +39 @@
-}
-
+sub gen_title {
+    my($self, $op, @tags) = @_;
+    return "Entries tagged with " .
+        join(" $op ", map { qq('$_') } @tags);
+}
+
-sub match_tags {
-    my($self, $op, $entry, $want_tags) = @_;