hush all warnings in normalize code

[webpac2] / lib / WebPAC / Normalize.pm

diff --git a/lib/WebPAC/Normalize.pm b/lib/WebPAC/Normalize.pm
index ae13f62..b3a508f 100644 (file)
--- a/lib/WebPAC/Normalize.pm
+++ b/lib/WebPAC/Normalize.pm
@@ -123,7 +123,7 @@ sub data_structure {
        $load_row_coderef = $arg->{load_row_coderef};
 
        no strict 'subs';
-       no warnings 'redefine';
+       no warnings 'all';
        eval "$arg->{rules};";
        die "error evaling $arg->{rules}: $@\n" if ($@);