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

done with addRevision tests

Browse source 
remaining fails are other stuff and I need to move on
This commit is contained in:
Doug Bell 2010-12-03 15:00:42 -06:00
parent 7c14d1e6c4
commit f43541c5c9
7 changed files with 9 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

2
lib/WebGUI.pm
View file

@ -152,7 +152,7 @@ sub handle {
for my $handler (@{$session->config->get("contentHandlers")}) { for my $handler (@{$session->config->get("contentHandlers")}) {
my $output = eval { WebGUI::Pluggable::run($handler, "handler", [ $session ] )}; my $output = eval { WebGUI::Pluggable::run($handler, "handler", [ $session ] )};
if ( my $e = WebGUI::Error->caught ) { if ( my $e = WebGUI::Error->caught ) {
$session->log->error($e->package.":".$e->line." - ".$e->error); $session->log->error($e->package.":".$e->line." - ".$e->full_message);
$session->log->debug($e->package.":".$e->line." - ".$e->trace); $session->log->debug($e->package.":".$e->line." - ".$e->trace);
} }
elsif ( $@ ) { elsif ( $@ ) {

3
t/Asset/EMSSubmissionForm.t
View file

@ -85,9 +85,6 @@ loginRgstr ;
# Add an EMS asset # Add an EMS asset
my $ems = $node->addChild({ my $ems = $node->addChild({
className =>'WebGUI::Asset::Wobject::EventManagementSystem', className =>'WebGUI::Asset::Wobject::EventManagementSystem',
title => 'Test EMS',
description => 'This is a test ems',
url => '/test-ems',
workflowIdCommit => 'pbworkflow000000000003', # Commit Content Immediately workflowIdCommit => 'pbworkflow000000000003', # Commit Content Immediately
registrationStaffGroupId => $registrars->getId, registrationStaffGroupId => $registrars->getId,
groupIdView => $attendees->getId, groupIdView => $attendees->getId,

2
t/Asset/Shortcut/020-content-last-modified.t
View file

@ -25,7 +25,7 @@ use WebGUI::Asset::Snippet;
#---------------------------------------------------------------------------- #----------------------------------------------------------------------------
# Init # Init
my $session = WebGUI::Test->session; my $session = WebGUI::Test->session;
my $node = WebGUI::Asset->getImportNode($session); my $node = WebGUI::Test->asset;
# Make a snippet to shortcut # Make a snippet to shortcut
my $now = time(); my $now = time();

2
t/Asset/Story.t
View file

@ -329,7 +329,7 @@ cmp_bag(
{ keyword => "whiskey", url => '/home/test-archive?func=view;keyword=whiskey', }, { keyword => "whiskey", url => '/home/test-archive?func=view;keyword=whiskey', },
], ],
'viewTemplateVariables: keywords_loop is okay' 'viewTemplateVariables: keywords_loop is okay'
); ) or debug( Dumper $viewVariables->{keyword_loop} );
is ($viewVariables->{updatedTimeEpoch}, $story->revisionDate, 'viewTemplateVariables: updatedTimeEpoch'); is ($viewVariables->{updatedTimeEpoch}, $story->revisionDate, 'viewTemplateVariables: updatedTimeEpoch');

4
t/Asset/Wobject/Collaboration/getThreads.t
View file

@ -89,6 +89,10 @@ $expect = sortThreads( sub { $b->get('revisionDate') <=> $a->get('revisionDate')
cmp_deeply( $page, $expect, 'getThreadsPaginator sort by no default' ) cmp_deeply( $page, $expect, 'getThreadsPaginator sort by no default' )
or diag( "GOT: " . Dumper $page ), diag( "EXPECTED: " . Dumper $expect ); or diag( "GOT: " . Dumper $page ), diag( "EXPECTED: " . Dumper $expect );
undef $collab2; undef $collab2;
# clear scratch to reset sort
$session->scratch->delete($collab->getId.'_sortBy');
$session->scratch->delete($collab->getId.'_sortDir');
# sortBy default from asset # sortBy default from asset
$collab->update({ $collab->update({
sortBy => 'assetData.revisionDate', sortBy => 'assetData.revisionDate',

2
t/Asset/Wobject/EventManagementSystem.t
View file

@ -65,7 +65,7 @@ my $ems = $node->addChild({
className =>'WebGUI::Asset::Wobject::EventManagementSystem', className =>'WebGUI::Asset::Wobject::EventManagementSystem',
title => 'Test EMS', title => 'Test EMS',
description => 'This is a test ems', description => 'This is a test ems',
url => '/test-ems', url => 'test-ems',
workflowIdCommit => 'pbworkflow000000000003', # Commit Content Immediately workflowIdCommit => 'pbworkflow000000000003', # Commit Content Immediately
registrationStaffGroupId => $registrars->getId, registrationStaffGroupId => $registrars->getId,
groupIdView => $attendees->getId, groupIdView => $attendees->getId,

2
t/Macro/RootTitle.t
View file

@ -33,7 +33,7 @@ $versionTag->set({name=>"Adding assets for RootTitle tests"});
my %tag = ( tagId => $versionTag->getId, status => "pending" ); my %tag = ( tagId => $versionTag->getId, status => "pending" );
addToCleanup($versionTag); addToCleanup($versionTag);
my $root = WebGUI::Asset->getRoot($session); my $root = WebGUI::Test->asset;
my %properties_A = ( my %properties_A = (
className => 'WebGUI::Asset::Snippet', className => 'WebGUI::Asset::Snippet',
title => 'Asset A', title => 'Asset A',