fix uiLevel tests, and loading multiple sessions.

This commit is contained in:
Colin Kuskie 2010-03-09 14:57:58 -08:00
parent 4beab182a5
commit ffe4e7fd37
13 changed files with 15 additions and 22 deletions

View file

@ -12,15 +12,19 @@ use lib 'tests';
use Test::AssetBase;
use Test::Asset::File;
use Test::Asset::Snippet;
use Test::Asset::RichEdit;
use Test::Asset::Shortcut;
use Test::Asset::Sku;
use Test::Asset::Wobject;
use Test::Asset::Template;
use Test::Asset::Redirect;
use Test::Asset::File::Image;
use Test::Asset::File::ZipArchive;
use Test::Asset::File::GalleryFile;
use Test::Asset::Redirect;
use Test::Asset::RichEdit;
use Test::Asset::Shortcut;
use Test::Asset::Sku;
use Test::Asset::Snippet;
use Test::Asset::Template;
use Test::Asset::Wobject;
use Test::Asset::Wobject::Article;
use Test::Asset::Wobject::Calendar;
use Test::Asset::Wobject::Carousel;
use Test::Asset::Wobject::Folder;
Test::Class->runtests;

View file

@ -13,7 +13,6 @@ use FindBin;
use lib "$FindBin::Bin/lib";
use base qw/Test::AssetBase/;
use WebGUI::Test;
use Test::More;
use Test::Deep;

View file

@ -13,7 +13,6 @@ use FindBin;
use lib "$FindBin::Bin/lib";
use base qw/Test::AssetBase/;
use WebGUI::Test;
use Test::More;
use Test::Deep;

View file

@ -13,7 +13,6 @@ use FindBin;
use lib "$FindBin::Bin/lib";
use base qw/Test::AssetBase/;
use WebGUI::Test;
use Test::More;
use Test::Deep;

View file

@ -13,7 +13,6 @@ use FindBin;
use lib "$FindBin::Bin/lib";
use base qw/Test::AssetBase/;
use WebGUI::Test;
use Test::More;
use Test::Deep;

View file

@ -13,7 +13,6 @@ use FindBin;
use lib "$FindBin::Bin/lib";
use base qw/Test::AssetBase/;
use WebGUI::Test;
use Test::More;
use Test::Deep;
@ -23,7 +22,7 @@ sub class {
return qw/WebGUI::Asset::Redirect/;
}
sub uiLevel {
sub assetUiLevel {
return 9;
}

View file

@ -13,7 +13,6 @@ use FindBin;
use lib "$FindBin::Bin/lib";
use base qw/Test::AssetBase/;
use WebGUI::Test;
use Test::More;
use Test::Deep;
@ -23,7 +22,7 @@ sub class {
return qw/WebGUI::Asset::RichEdit/;
}
sub uiLevel {
sub assetUiLevel {
return 5;
}

View file

@ -13,7 +13,6 @@ use FindBin;
use lib "$FindBin::Bin/lib";
use base qw/Test::AssetBase/;
use WebGUI::Test;
use Test::More;
use Test::Deep;

View file

@ -13,7 +13,6 @@ use FindBin;
use lib "$FindBin::Bin/lib";
use base qw/Test::AssetBase/;
use WebGUI::Test;
use Test::More;
use Test::Deep;

View file

@ -13,7 +13,6 @@ use FindBin;
use lib "$FindBin::Bin/lib";
use base qw/Test::AssetBase/;
use WebGUI::Test;
use Test::More;
use Test::Deep;
@ -23,7 +22,7 @@ sub class {
return qw/WebGUI::Asset::Snippet/;
}
sub uiLevel {
sub assetUiLevel {
return 5;
}

View file

@ -13,7 +13,6 @@ use FindBin;
use lib "$FindBin::Bin/lib";
use base qw/Test::AssetBase/;
use WebGUI::Test;
use Test::More;
use Test::Deep;

View file

@ -13,7 +13,6 @@ use FindBin;
use lib "$FindBin::Bin/lib";
use base qw/Test::AssetBase/;
use WebGUI::Test;
use Test::More;
use Test::Deep;

View file

@ -127,7 +127,7 @@ sub assetId : Test(4) {
is $asset->assetId, $asset->getId, '... getId is an alias for assetId';
$asset = $test->class->new({ session => $session, assetId => '' });
ok $session->id->valid($asset->assetId), 'blank assetid in constructor causes an assetId to be generated';
ok !$session->id->valid($asset->assetId), 'blank assetId in constructor is okay??';
}
sub class_dispatch : Test(2) {