Revision cc849a74
Von Sven Schöling vor mehr als 11 Jahren hinzugefügt
t/structure/globals.t | ||
---|---|---|
3 | 3 |
use strict; |
4 | 4 |
use lib 't'; |
5 | 5 |
use Support::Files; |
6 |
use Support::CanonialGlobals (); |
|
6 | 7 |
|
7 | 8 |
my (@globals, $testcount); |
8 | 9 |
|
9 | 10 |
BEGIN { |
10 |
@globals = qw(lxdebug auth myconfig form lx_office_conf locale dispatcher instance_conf request);
|
|
11 |
@globals = map { s/[^a-z_]//; $_ } @Support::CanonialGlobals::globals;
|
|
11 | 12 |
$testcount = scalar(@Support::Files::testitems); |
12 | 13 |
} |
13 | 14 |
|
Auch abrufbar als: Unified diff
globale Variablen in ein Helfermodul ausgelagert