oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

moved some things into sub folders

Browse source
This commit is contained in:
JT Smith 2006-01-16 15:42:24 +00:00
parent cbaacde6ba
commit 4ecdd5022b
7 changed files with 15 additions and 18 deletions
Download patch file Download diff file Expand all files Collapse all files

4
t/Session_DateTime.t → t/Session/DateTime.t
View file

@ -10,7 +10,7 @@
# ---- BEGIN DO NOT EDIT ----
use strict;
use lib '../lib';
use lib '../../lib';
use Getopt::Long;
use WebGUI::Session;
# ---- END DO NOT EDIT ----
@ -57,7 +57,7 @@ sub initialize {
'configFile=s'=>\$configFile
);
exit 1 unless ($configFile);
my $session = WebGUI::Session->open("..",$configFile);
my $session = WebGUI::Session->open("../..",$configFile);
}
sub cleanup {
my $session = shift;

4
t/Session_Env.t → t/Session/Env.t
View file

@ -10,7 +10,7 @@
# ---- BEGIN DO NOT EDIT ----
use strict;
use lib '../lib';
use lib '../../lib';
use Getopt::Long;
use WebGUI::Session;
# ---- END DO NOT EDIT ----
@ -34,7 +34,7 @@ sub initialize {
'configFile=s'=>\$configFile
);
exit 1 unless ($configFile);
my $session = WebGUI::Session->open("..",$configFile);
my $session = WebGUI::Session->open("../..",$configFile);
}
sub cleanup {

4
t/Session_Id.t → t/Session/Id.t
View file

@ -10,7 +10,7 @@
# ---- BEGIN DO NOT EDIT ----
use strict;
use lib '../lib';
use lib '../../lib';
use Getopt::Long;
use WebGUI::Session;
# ---- END DO NOT EDIT ----
@ -46,7 +46,7 @@ sub initialize {
'configFile=s'=>\$configFile
);
exit 1 unless ($configFile);
my $session = WebGUI::Session->open("..",$configFile);
my $session = WebGUI::Session->open("../..",$configFile);
}
sub cleanup {

4
t/Session_Os.t → t/Session/Os.t
View file

@ -10,7 +10,7 @@
# ---- BEGIN DO NOT EDIT ----
use strict;
use lib '../lib';
use lib '../../lib';
use Getopt::Long;
use WebGUI::Session;
# ---- END DO NOT EDIT ----
@ -35,7 +35,7 @@ sub initialize {
'configFile=s'=>\$configFile
);
exit 1 unless ($configFile);
my $session = WebGUI::Session->open("..",$configFile);
my $session = WebGUI::Session->open("../..",$configFile);
}
sub cleanup {

4
t/Session_Setting.t → t/Session/Setting.t
View file

@ -10,7 +10,7 @@
# ---- BEGIN DO NOT EDIT ----
use strict;
use lib '../lib';
use lib '../../lib';
use Getopt::Long;
use WebGUI::Session;
# ---- END DO NOT EDIT ----
@ -39,7 +39,7 @@ sub initialize {
'configFile=s'=>\$configFile
);
exit 1 unless ($configFile);
my $session = WebGUI::Session->open("..",$configFile);
my $session = WebGUI::Session->open("../..",$configFile);
}
sub cleanup {
my $session = shift;

7
t/Session_Stow.t → t/Session/Stow.t
View file

@ -10,7 +10,7 @@
# ---- BEGIN DO NOT EDIT ----
use strict;
use lib '../lib';
use lib '../../lib';
use Getopt::Long;
use WebGUI::Session;
# ---- END DO NOT EDIT ----
@ -19,9 +19,8 @@ use Test::More tests => 22; # increment this value for each test you create
my $session = initialize(); # this line is required
# put your tests here
use WebGUI::Session::Stow;
my $stow = WebGUI::Session::Stow->new($session);
my $stow = $session->stow;
my $count = 0;
my $maxCount = 20;
@ -48,7 +47,7 @@ sub initialize {
'configFile=s'=>\$configFile
);
exit 1 unless ($configFile);
my $session = WebGUI::Session->open("..",$configFile);
my $session = WebGUI::Session->open("../..",$configFile);
}
sub cleanup {
my $session = shift;

6
t/Session_Var.t → t/Session/Var.t
View file

@ -10,7 +10,7 @@
# ---- BEGIN DO NOT EDIT ----
use strict;
use lib '../lib';
use lib '../../lib';
use Getopt::Long;
use WebGUI::Session;
# ---- END DO NOT EDIT ----
@ -18,8 +18,6 @@ use Test::More tests => 6; # increment this value for each test you create
my $session = initialize(); # this line is required
# put your tests here
use WebGUI::Session::Var;
ok($session->var->getId ne "", "getId()");
ok($session->var->get("lastPageView") > 0, "get()");
@ -44,7 +42,7 @@ sub initialize {
'configFile=s'=>\$configFile
);
exit 1 unless ($configFile);
my $session = WebGUI::Session->open("..",$configFile);
my $session = WebGUI::Session->open("../..",$configFile);
}
sub cleanup {
my $session = shift;