X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=t%2F002goodperl.t;h=1f3a611d850b82ee3c79be992908b0c74fda8087;hb=2cf7a2cd78d812d917fb4c92f8ee57f6a32f3685;hp=3b395b310c8e78d204aecb1db0fb0c43244d9496;hpb=185d9aae8dc204c61e003ee7863221927fea667b;p=kivitendo-erp.git diff --git a/t/002goodperl.t b/t/002goodperl.t index 3b395b310..1f3a611d8 100644 --- a/t/002goodperl.t +++ b/t/002goodperl.t @@ -82,8 +82,6 @@ foreach my $file (@testitems) { } foreach my $file (@testitems) { - local $TODO; - $TODO = 'schema updates are not required to be strict now' if $file =~ m{^sql/Pg-upgrade2}; my $found_use_strict = 0; $file =~ s/\s.*$//; # nuke everything after the first space (#comment) next if (!$file); # skip null entries @@ -108,7 +106,7 @@ foreach my $file (@testitems) { # note, the html checker is not really thorough. # in particular it will not find standard tags with parameters. -# the estimate wether a file is dirty or not is still pretty helpful, as it will catch most of the closing tags. +# the estimate whether a file is dirty or not is still pretty helpful, as it will catch most of the closing tags. # if you are in doubt about a specific file, you still have to check it manually. my $tags = qr/b|i|u|h[1-6]|a href.*|input|form|br|textarea|table|tr|td|th|body|head|html|p|button|select|option|script/; my $todo_files_re = qr{^bin/mozilla/ic\.pl$};