|
|
|
@ -129,6 +129,7 @@ sub process_feed { |
|
|
|
my $text = ($feedconf->{lookup} eq 'title') |
|
|
|
my $text = ($feedconf->{lookup} eq 'title') |
|
|
|
? $entry->title |
|
|
|
? $entry->title |
|
|
|
: $entry->content->body; |
|
|
|
: $entry->content->body; |
|
|
|
|
|
|
|
_log(info => "Processing: " . $entry->title); |
|
|
|
_log(debug => "Match text is: ". $text); |
|
|
|
_log(debug => "Match text is: ". $text); |
|
|
|
foreach my $match (@{ $feedconf->{matches} }) { |
|
|
|
foreach my $match (@{ $feedconf->{matches} }) { |
|
|
|
if ($match =~ m{^/(.*)/$}) { |
|
|
|
if ($match =~ m{^/(.*)/$}) { |
|
|
|
|
