170 |
$log->debug("cache miss, creating"); |
$log->debug("cache miss, creating"); |
171 |
} |
} |
172 |
|
|
|
undef $self->{'currnet_filename'}; |
|
|
undef $self->{'headline'}; |
|
|
|
|
173 |
my @sorted_tags; |
my @sorted_tags; |
174 |
if ($self->{tags_by_order}) { |
if ($self->{tags_by_order}) { |
175 |
@sorted_tags = @{$self->{tags_by_order}}; |
@sorted_tags = @{$self->{tags_by_order}}; |
298 |
|
|
299 |
=cut |
=cut |
300 |
|
|
301 |
|
my $warn_once; |
302 |
|
|
303 |
sub parse { |
sub parse { |
304 |
my $self = shift; |
my $self = shift; |
305 |
|
|
380 |
$out = $self->{'filter'}->{$filter_name}->(@filter_args); |
$out = $self->{'filter'}->{$filter_name}->(@filter_args); |
381 |
return unless(defined($out)); |
return unless(defined($out)); |
382 |
$log->debug("filter result: $out"); |
$log->debug("filter result: $out"); |
383 |
} else { |
} elsif (! $warn_once->{$filter_name}) { |
384 |
$log->warn("trying to use undefined filter $filter_name"); |
$log->warn("trying to use undefined filter $filter_name"); |
385 |
|
$warn_once->{$filter_name}++; |
386 |
} |
} |
387 |
} |
} |
388 |
|
|