From: Sven Schöling <s.schoeling@linet-services.de>
Date: Mon, 19 Sep 2011 09:12:58 +0000 (+0200)
Subject: dbupgrade .pl müssen nicht strict sein.
X-Git-Tag: release-2.7.0beta1~281^2
X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/commitdiff_plain/b93a2d44c5725d71a222a067e2b90cb0e602d76e?ds=inline;hp=-c

dbupgrade .pl müssen nicht strict sein.
---

b93a2d44c5725d71a222a067e2b90cb0e602d76e
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