More debugging.

git-svn-id: svn://10.0.0.236/trunk@44688 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
slamm%netscape.com 1999-08-26 16:38:56 +00:00
parent eb26fb2c32
commit 810f8337cb

View File

@ -33,6 +33,12 @@ use FileHandle;
$debug = 1 if $ARGV[0] eq '--debug';
if ($debug) {
foreach my $key (sort keys %ENV) {
warn "debug> $key=$ENV{$key}\n";
}
}
$tree = 'SeaMonkey';
# tinderbox/tbglobals.pl uses many shameful globals
$form{tree} = $tree;