Add a version tag so we work on a committed parent.

This commit is contained in:
Colin Kuskie 2010-03-24 17:02:05 -07:00
parent 54f0148ec9
commit 237eaa9990
2 changed files with 31 additions and 2 deletions

View file

@ -195,12 +195,14 @@ sub write_update : Test(8) {
sub keywords : Test(3) {
my $test = shift;
my $session = $test->session;
note "keywords for ".$test->class;
my $tag = WebGUI::VersionTag->getWorking($session);
my @parents = $test->getMyParents;
my $asset = $parents[-1]->addChild({
my $asset = $parents[-1]->addChild({
className => $test->class,
}, undef, undef, {skipNotification => 1, skipAutoCommitWorkflows => 1,});
addToCleanup($asset);
$tag->commit;
addToCleanup($tag);
can_ok $asset, 'keywords';
$asset->keywords('chess set');
is $asset->keywords, 'chess set', 'set and get of keywords via direct accessor';