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

almost done fixing addRevision tests

Browse source
This commit is contained in:
Doug Bell 2010-11-19 19:26:39 -06:00
parent 6931fd471e
commit 7c14d1e6c4
122 changed files with 389 additions and 1052 deletions
Download patch file Download diff file Expand all files Collapse all files

11
t/Asset/Post/Thread/getAdjacentThread.t
View file

@ -25,10 +25,10 @@ my $session = WebGUI::Test->session;
my @versionTags = ( WebGUI::VersionTag->getWorking( $session ) );
my @addChildArgs = ( {skipAutoCommitWorkflows=>1} );
my $collab = WebGUI::Asset->getImportNode( $session )->addChild({
my $collab = WebGUI::Test->asset(
className => 'WebGUI::Asset::Wobject::Collaboration',
threadsPerPage => 20,
});
);
my @threads = (
$collab->addChild( {
@ -58,11 +58,6 @@ my @threads = (
);
$_->setSkipNotification for @threads;
$versionTags[-1]->commit;
WebGUI::Test->addToCleanup($versionTags[-1]);
foreach my $asset(@threads, $collab) {
$asset = $asset->cloneFromDb;
}
#----------------------------------------------------------------------------
# Tests
@ -141,6 +136,8 @@ push @threads, $collab->addChild( {
title => "Abababa",
isSticky => 0,
threadRating => 1_000_000,
tagId => $versionTags[-1]->getId,
status => "pending",
}, undef, 6, @addChildArgs
);
$sort = sub { $b->get('revisionDate') <=> $a->get('revisionDate') };

5
t/Asset/Post/Thread/permission.t
View file

@ -48,6 +48,8 @@ my $collab
canStartThreadGroupId => 3, # Admin
allowReplies => 1,
editTimeout => 60 * 60 * 24, # 24 hours
tagId => $versionTag->getId,
status => "pending",
}, @addArgs );
my $thread
@ -55,7 +57,10 @@ my $thread
className => 'WebGUI::Asset::Post::Thread',
ownerUserId => $user{"2"}->userId,
groupIdView => 7,
tagId => $versionTag->getId,
status => "pending",
}, @addArgs );
$thread->setSkipNotification;
$versionTag->commit( { timeout => 1_000_000 } );