X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/62fb45641a998f075ec1632c386e51ec812b431f..cc849a74f2a5ff51b8a0f8224f2cadc2f63acd56:/t/structure/globals.t

diff --git a/t/structure/globals.t b/t/structure/globals.t
index 0a04c6f6f..dca7369d5 100644
--- a/t/structure/globals.t
+++ b/t/structure/globals.t
@@ -3,11 +3,12 @@
 use strict;
 use lib 't';
 use Support::Files;
+use Support::CanonialGlobals ();
 
 my (@globals, $testcount);
 
 BEGIN {
-  @globals = qw(lxdebug auth myconfig form lx_office_conf locale dispatcher instance_conf request);
+  @globals = map { s/[^a-z_]//; $_ } @Support::CanonialGlobals::globals;
   $testcount = scalar(@Support::Files::testitems);
 }