From: Sven Schöling <s.schoeling@linet-services.de>
Date: Thu, 4 Aug 2016 11:29:22 +0000 (+0200)
Subject: Tests: ic.pl nicht mehr vom html-tag counter ausschließen
X-Git-Tag: release-3.5.4~2147
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=9909696e2940d138d39e35df8822b6d0bf7bd95b;p=kivitendo-erp.git

Tests: ic.pl nicht mehr vom html-tag counter ausschließen

Nachdem top100 rausgeflogen ist, ist das mit 13 tags sogar noch gut im
Mittelfeld der Sünder.
---

diff --git a/t/002goodperl.t b/t/002goodperl.t
index 1f3a611d8..951790115 100644
--- a/t/002goodperl.t
+++ b/t/002goodperl.t
@@ -109,7 +109,6 @@ foreach my $file (@testitems) {
 # 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$};
 foreach my $file (@testitems) {
     my $found_html_count = 0;
     my $found_html       = '';
@@ -135,13 +134,7 @@ foreach my $file (@testitems) {
         ok(0,"$file contains at least $found_html_count html tags.");
       }
     } else {
-      if ($file =~ $todo_files_re) {
-        TODO: { local $TODO = q(This file is known to have lots of old cruft.);
-          ok(0,"$file contains at least $found_html_count html tags.");
-        }
-      } else {
-        ok(0,"$file contains at least $found_html_count html tags.");
-      }
+      ok(0,"$file contains at least $found_html_count html tags.");
     }
 }