implemented filter which can replace (or be used together with) unac_string

[webpac] / WebPac.pm

diff --git a/WebPac.pm b/WebPac.pm
index 3ed8a33..6cb4875 100644 (file)
--- a/WebPac.pm
+++ b/WebPac.pm
@@ -28,7 +28,11 @@ my $MAX_HITS = $cfg_global->val('webpac', 'max_hits') || 0;
 my $ON_PAGE =$cfg_global->val('webpac', 'on_page') || 10;
 my $MIN_WILDCARD =$cfg_global->val('webpac', 'min_wildcard') || 1;
 my $TEMPLATE =$cfg_global->val('webpac', 'template');
+my $UNAC_FILTER =$cfg_global->val('global', 'unac_filter');
 
+if ($UNAC_FILTER) {
+       require $UNAC_FILTER;
+}
 
 Text::Iconv->raise_error(0);     # Conversion errors raise exceptions