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

Add tests for 100% coverage of getProfileUrl

Browse source
This commit is contained in:
Colin Kuskie 2009-03-28 04:55:13 +00:00
parent 1e268ee238
commit 39785cf169
1 changed files with 35 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

38
t/User.t
View file

@ -20,7 +20,7 @@ use WebGUI::Cache;
use WebGUI::User;
use WebGUI::ProfileField;
use Test::More tests => 144; # increment this value for each test you create
use Test::More tests => 147; # increment this value for each test you create
use Test::Deep;
my $session = WebGUI::Test->session;
@ -623,8 +623,13 @@ cmp_bag(
);
#----------------------------------------------------------------------------
# Test the new create() method
################################################################
#
# create
#
################################################################
SKIP: {
eval{ require Test::Exception; import Test::Exception };
skip 1, 'Test::Exception not found' if $@;
@ -639,6 +644,33 @@ ok( my $newCreateUser = WebGUI::User->create( $session ),
);
isa_ok( $newCreateUser, 'WebGUI::User', 'create() returns a WebGUI::User' );
################################################################
#
# getProfileUrl
#
################################################################
WebGUI::Test->originalConfig('profileModuleIdentifier');
my $profileModuleId = $session->config->get('profileModuleIdentifier');
is(
$newFish->getProfileUrl('cellblock'),
"cellblock?op=account;module=$profileModuleId;do=view;uid=".$newFish->userId,
'getProfileUrl: passing a page'
);
$session->config->set('profileModuleIdentifier', 'someOtherThing');
is(
$newFish->getProfileUrl('cellblock'),
"cellblock?op=account;module=someOtherThing;do=view;uid=".$newFish->userId,
'getProfileUrl: uses profileModuleIdentifier to pick the right Account module'
);
$session->config->set('profileModuleIdentifier', $profileModuleId);
$session->asset(WebGUI::Asset->getDefault($session));
is(
$newFish->getProfileUrl(),
"/home?op=account;module=$profileModuleId;do=view;uid=".$newFish->userId,
'getProfileUrl: uses session->url->page if no URL is passed in'
);
END {
foreach my $account ($user, $dude, $buster, $buster3, $neighbor, $friend, $newFish, $newCreateUser) {