From b93a2d44c5725d71a222a067e2b90cb0e602d76e Mon Sep 17 00:00:00 2001 From: =?utf8?q?Sven=20Sch=C3=B6ling?= Date: Mon, 19 Sep 2011 11:12:58 +0200 Subject: [PATCH] =?utf8?q?dbupgrade=20.pl=20m=C3=BCssen=20nicht=20strict?= =?utf8?q?=20sein.?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- t/002goodperl.t | 2 ++ 1 file changed, 2 insertions(+) diff --git a/t/002goodperl.t b/t/002goodperl.t index 28b69a4c5..d80d9eea3 100644 --- a/t/002goodperl.t +++ b/t/002goodperl.t @@ -82,6 +82,8 @@ 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 -- 2.20.1