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

Add 1 basic test for canPaste.

Browse source
This commit is contained in:
Colin Kuskie 2010-04-11 20:24:23 -07:00
parent 873c07ac73
commit 2d4d95a01e
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
t/tests/Test/WebGUI/Asset.pm
View file

@ -324,7 +324,7 @@ sub purge : Test(3) {
ok ! $exists_in_table, 'assetId removed from all asset tables';
}
sub cut_paste : Test(4) {
sub cut_paste : Test(5) {
note "cut";
my $test = shift;
my $session = $test->session;
@ -333,6 +333,7 @@ sub cut_paste : Test(4) {
is $asset->state, 'clipboard', 'asset state updated';
my $session_asset = $session->asset();
$session->asset($parents[-1]);
ok $asset->canPaste, 'canPaste: allowed to paste here';
ok $parents[-1]->paste($asset->assetId), 'paste returns true when it pastes';
$asset_prime = $asset->cloneFromDb;
is $asset_prime->state, 'published', 'asset state updated';