Bug 14111 - More t/Auth_with_shibboleth.t silencing

TEST PLAN
---------
1) Apply first patch
2) prove t/Auth_with_shibboleth.t
   -- failed?!
3) apply this patch
4) prove t/Auth_with_shibboleth.t
   -- success. *whew*
5) koha-qa test tools.

Signed-off-by: Indranil Das Gupta (L2C2 Technologies) <indradg@gmail.com>

Test remarks: Expected outcome as per test plan. No anomaly noted.

Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
Signed-off-by: Tomas Cohen Arazi <tomascohen@gmail.com>
This commit is contained in:
Mark Tompsett 2015-05-04 20:37:58 -04:00 committed by Tomas Cohen Arazi
parent 85a057bc5e
commit 8e726e3ee1

View file

@ -28,7 +28,7 @@ use C4::Context;
BEGIN {
if ( check_install( module => 'Test::DBIx::Class' ) ) {
plan tests => 9;
plan tests => 11;
} else {
plan skip_all => "Need Test::DBIx::Class"
}
@ -249,10 +249,8 @@ is( C4::Auth_with_shibboleth::_get_uri(),
$OPACBaseURL = "http://testopac.com";
my $result;
warnings_are { $result = C4::Auth_with_shibboleth::_get_uri() }
[ { carped =>
'Shibboleth requires OPACBaseURL to use the https protocol!' },
],
warning_like { $result = C4::Auth_with_shibboleth::_get_uri() }
[ qr/Shibboleth requires OPACBaseURL to use the https protocol!/ ],
"improper protocol - received expected warning";
is( $result, "https://testopac.com", "https opac uri returned" );
@ -261,9 +259,8 @@ is( C4::Auth_with_shibboleth::_get_uri(),
"https://testopac.com", "https opac uri returned" );
$OPACBaseURL = undef;
warnings_are { $result = C4::Auth_with_shibboleth::_get_uri() }
[ { carped => 'OPACBaseURL not set!' },
],
warning_like { $result = C4::Auth_with_shibboleth::_get_uri() }
[ qr/OPACBaseURL not set!/ ],
"undefined OPACBaseURL - received expected warning";
is( $result, "https://", "https opac uri returned" );