Bug 165756 - Running tests without checksetup causes failure

r=joel, jake
parent 0f9e4c38
...@@ -26,8 +26,7 @@ use strict; ...@@ -26,8 +26,7 @@ use strict;
use DBI; use DBI;
use RelationSet; use RelationSet;
use vars qw($unconfirmedstate $legal_keywords); use vars qw($unconfirmedstate $legal_keywords);
require "globals.pl";
require "CGI.pl";
package Bug; package Bug;
use CGI::Carp qw(fatalsToBrowser); use CGI::Carp qw(fatalsToBrowser);
my %ok_field; my %ok_field;
......
...@@ -26,8 +26,7 @@ use strict; ...@@ -26,8 +26,7 @@ use strict;
use DBI; use DBI;
use RelationSet; use RelationSet;
use vars qw($unconfirmedstate $legal_keywords); use vars qw($unconfirmedstate $legal_keywords);
require "globals.pl";
require "CGI.pl";
package Bug; package Bug;
use CGI::Carp qw(fatalsToBrowser); use CGI::Carp qw(fatalsToBrowser);
my %ok_field; my %ok_field;
......
...@@ -27,8 +27,7 @@ ...@@ -27,8 +27,7 @@
use strict; use strict;
require "globals.pl"; # The caller MUST require CGI.pl and globals.pl before using this
require "CGI.pl";
use vars qw($userid $usergroupset); use vars qw($userid $usergroupset);
......
...@@ -25,8 +25,12 @@ use strict; ...@@ -25,8 +25,12 @@ use strict;
use lib qw(.); use lib qw(.);
use Bug;
require "CGI.pl"; require "CGI.pl";
use vars qw($userid %COOKIE);
use Bug;
$::lockcount = 0; $::lockcount = 0;
unless ( Param("move-enabled") ) { unless ( Param("move-enabled") ) {
......
...@@ -26,10 +26,11 @@ use strict; ...@@ -26,10 +26,11 @@ use strict;
use lib qw(.); use lib qw(.);
use Bug;
require "CGI.pl"; require "CGI.pl";
use vars qw($template $vars); use Bug;
use vars qw($template $vars $userid %COOKIE);
ConnectToDatabase(); ConnectToDatabase();
quietly_check_login(); quietly_check_login();
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment