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

remove grepping hash keys for single value

Browse source
This commit is contained in:
Graham Knop 2010-08-20 13:17:46 -05:00
parent 96ba0da75a
commit 2c2bd55675
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -463,7 +463,7 @@ sub t_10_addRevision : Tests {
# copied this code
SKIP: {
no strict 'refs';
skip 'Added to existing working tag / class does something magical to tagId using a custom getAutoCommitWorkflowId method', 1, if grep $_ eq 'getAutoCommitWorkflowId', keys %{$test->class . '::'};
skip 'Added to existing working tag / class does something magical to tagId using a custom getAutoCommitWorkflowId method', 1, if exists ${$test->class . '::'}{getAutoCommitWorkflowId};
is( $newRevision->tagId, $tag->getId, 'Added to existing working tag' );
};
@ -587,7 +587,7 @@ warn "XXX mergedProperties: " . Dumper \%mergedProperties;
SKIP: {
no strict 'refs';
skip 'class does something magical to tagId using a custom getAutoCommitWorkflowId method', 1, if grep $_ eq 'getAutoCommitWorkflowId', keys %{$test->class . '::'};
skip 'class does something magical to tagId using a custom getAutoCommitWorkflowId method', 1, if exists ${$test->class . '::'}{getAutoCommitWorkflowId};
is( $newRevision->tagId, $tag->getId, 'new revision tagId is current working tag' );
};