From c5609d440813c2072a2840cc7e4316e7c025272e Mon Sep 17 00:00:00 2001 From: Martin Renvoize Date: Wed, 22 Mar 2017 13:54:46 +0000 Subject: [PATCH] Bug 12026: [Rebase Follow-up] - Fix Test --- C4/Auth_with_shibboleth.pm | 2 +- t/Auth_with_shibboleth.t | 3 ++- 2 files changed, 3 insertions(+), 2 deletions(-) diff --git a/C4/Auth_with_shibboleth.pm b/C4/Auth_with_shibboleth.pm index 1c996a2..4e7c0f0 100644 --- a/C4/Auth_with_shibboleth.pm +++ b/C4/Auth_with_shibboleth.pm @@ -116,7 +116,7 @@ sub checkpw_shib { sub _autocreate { my ( $config, $match ) = @_; - my %borrower = ( shibbolethMatchField => $match ); + my %borrower = ( $config->{matchpoint} => $match ); while ( my ( $key, $entry ) = each %{$config->{'mapping'}} ) { $borrower{$key} = ( $entry->{'is'} && $ENV{ $entry->{'is'} } ) || $entry->{'content'} || ''; diff --git a/t/Auth_with_shibboleth.t b/t/Auth_with_shibboleth.t index 5f24cd2..7ce3b47 100644 --- a/t/Auth_with_shibboleth.t +++ b/t/Auth_with_shibboleth.t @@ -97,7 +97,8 @@ sub reset_config { ############################################################## # Can module load -use_ok('C4::Auth_with_shibboleth'); +use C4::Auth_with_shibboleth; +require_ok('C4::Auth_with_shibboleth'); $C4::Auth_with_shibboleth::debug = '0'; # Subroutine tests -- 2.1.4