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

fix Asset.t. Safe references are not always safe

Browse source
This commit is contained in:
Colin Kuskie 2008-09-30 18:23:17 +00:00
parent 21545535be
commit 79cbb85285
1 changed files with 3 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

5
t/Asset/Asset.t
View file

@ -28,6 +28,7 @@ use Test::More;
use Test::Deep; use Test::Deep;
use Test::MockObject; use Test::MockObject;
use HTML::TokeParser; use HTML::TokeParser;
use Storable qw/dclone/;
my $session = WebGUI::Test->session; my $session = WebGUI::Test->session;
@ -36,7 +37,7 @@ my @fixTitleTests = getFixTitleTests($session);
my @getTitleTests = getTitleTests($session); my @getTitleTests = getTitleTests($session);
my $rootAsset = WebGUI::Asset->getRoot($session); my $rootAsset = WebGUI::Asset->getRoot($session);
my $originalAssetOverrides = $session->config->get('assets'); my $originalAssetOverrides = dclone($session->config->get('assets'));
##Test users. ##Test users.
##All users in here will be deleted at the end of the test. DO NOT PUT ##All users in here will be deleted at the end of the test. DO NOT PUT
@ -584,7 +585,7 @@ $session->config->set('assets/WebGUI::Asset/uiLevel', 8);
$session->config->set('assets/WebGUI::Asset::Snippet/uiLevel', 8); $session->config->set('assets/WebGUI::Asset::Snippet/uiLevel', 8);
is($canEditAsset->getUiLevel, 8, 'getUiLevel: WebGUI::Asset has a configured uiLevel of 8'); is($canEditAsset->getUiLevel, 8, 'getUiLevel: WebGUI::Asset has a configured uiLevel of 8');
is($fixTitleAsset->getUiLevel, 9, 'getUiLevel: Snippet has a configured uiLevel of 9'); is($fixTitleAsset->getUiLevel, 8, 'getUiLevel: Snippet has a configured uiLevel of 8');
################################################################ ################################################################