X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/e293009f4e1d70e547a479e956fd1733c24b1441..2ece7a00cb1ba94e9543cf040632b89b50630066:/t/006spellcheck.t

diff --git a/t/006spellcheck.t b/t/006spellcheck.t
index 600460c66..bc511a426 100644
--- a/t/006spellcheck.t
+++ b/t/006spellcheck.t
@@ -30,20 +30,34 @@ use Support::Files;
 BEGIN { # yes the indenting is off, deal with it
 #add the words to check here:
 @evilwords = qw(
+CONTANTS
 anyways
 arbitary
+cofigur
 custemer
 databasa
 dependan
+execept
 existance
 existant
-paramater
-varsion
 fomr
+invoce
+lenght
+paramater
+pirce
+postition
+primt
+puchase
 puhs
+sekf
+seperat
+sucess
+unkown
+varsion
+wether
 );
 
-$testcount = scalar(@Support::Files::testitems);
+$testcount = scalar(@Support::Files::files);
 }
 
 use Test::More tests => $testcount;
@@ -62,7 +76,7 @@ my $fh;
     }
 }
 
-my @testitems = @Support::Files::testitems;
+my @testitems = @Support::Files::files;
 
 # at last, here we actually run the test...
 my $evilwordsregexp = join('|', @evilwords);