Conservancy/supporters
6
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

_getOrCreateRequestConfiguration: Additional test.

Browse source 
This additional test makes sure that it still fails a previous condition
when the requestTypeId is correct.
This commit is contained in:
Bradley M. Kuhn 2015-12-20 11:12:12 -08:00
parent 8f22a89a47
commit fc2250203d
1 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
Supporters/t/Supporters.t
View file

@ -5,7 +5,7 @@
use strict; use strict;
use warnings; use warnings;
use Test::More tests => 124; use Test::More tests => 125;
use Test::Exception; use Test::Exception;
use Scalar::Util qw(looks_like_number reftype); use Scalar::Util qw(looks_like_number reftype);
@ -458,6 +458,10 @@ dies_ok { $tempSP->_getOrCreateRequestConfiguration({ requestTypeId => "NoString
dies_ok { $tempSP->_getOrCreateRequestConfiguration({ requestTypeId => 0 }); } dies_ok { $tempSP->_getOrCreateRequestConfiguration({ requestTypeId => 0 }); }
"_getOrCreateRequestConfiguration: dies for non-existant requestTypeId"; "_getOrCreateRequestConfiguration: dies for non-existant requestTypeId";
dies_ok { $tempSP->_getOrCreateRequestConfiguration({ requestTypeId => $rr,
requestConfigurationId => "NoStringsPlease" }); }
"_getOrCreateRequestConfiguration: dies for string requestConfigurationId with valid requestTypeId";
%hh = ( requestConfiguration => 'test-request-config' ); %hh = ( requestConfiguration => 'test-request-config' );
dies_ok { $tempSP->_getOrCreateRequestConfiguration(\%hh); } dies_ok { $tempSP->_getOrCreateRequestConfiguration(\%hh); }
"_getOrCreateRequestConfiguration: fails with just requestConfiguration."; "_getOrCreateRequestConfiguration: fails with just requestConfiguration.";