Changeset 256

Timestamp:

09/05/06 17:30:43 (2 years ago)

Author:

miya

Message:

Filter::Rule: support config 'exporession' to set the expression for applying the rule.
Filter::CloneFeed: Added.

Files:

• plagger/trunk/lib/Plagger/Plugin/Filter/CloneFeed.pm (added)
• plagger/trunk/lib/Plagger/Plugin/Filter/Rule.pm (modified) (2 diffs)

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

@@ -14 +14 @@
-sub update {
-    my($self, $context, $args) = @_;
-    use Data::Dumper;
-    warn Dumper $self->{entries};
-    $self->{entries}->{$args->{entry}} = 1;
-}
@@ -21 +19 @@
-sub feed {
-    my($self, $context, $args) = @_;
+
+    if ( defined ( my $expression = $self->conf->{expression} ) ){
+        my $status = eval $expression;
+        if ($@) {
+            Plagger->context->log(error => "Expression error: $@ with '$expression'");
+        }
+        return unless $status;
+    }
-
-    for my $entry ($args->{feed}->entries) {