From 3acef069fa1016050f67b0c5180786d516b170a2 Mon Sep 17 00:00:00 2001
From: Martin Renvoize <martin.renvoize@ptfs-europe.com>
Date: Wed, 2 Apr 2014 08:12:54 +0000
Subject: [PATCH] BUG8446, Follow up: Correct paths after file rename

---
 C4/Auth.pm                 |    6 +++---
 C4/Auth_with_shibboleth.pm |    2 +-
 opac/opac-main.pl          |    4 ++--
 3 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/C4/Auth.pm b/C4/Auth.pm
index caecd64..4209fa3 100644
--- a/C4/Auth.pm
+++ b/C4/Auth.pm
@@ -58,13 +58,13 @@ BEGIN {
     $shib        = C4::Context->config('useshibboleth') || 0;
     $caslogout   = C4::Context->preference('casLogout');
     require C4::Auth_with_cas;             # no import
-    require C4::Auth_with_Shibboleth;
+    require C4::Auth_with_shibboleth;
     if ($ldap) {
     require C4::Auth_with_ldap;
     import C4::Auth_with_ldap qw(checkpw_ldap);
     }
     if ($shib) {
-        import C4::Auth_with_Shibboleth
+        import C4::Auth_with_shibboleth
           qw(checkpw_shib logout_shib login_shib_url get_login_shib);
 
         # Get shibboleth login attribute
@@ -1621,7 +1621,7 @@ sub checkpw {
 
         # Then, we check if it matches a valid koha user
         if ($shib_login) {
-            my ( $retval, $retcard, $retuserid ) = C4::Auth_with_Shibboleth::checkpw_shib( $dbh, $shib_login );    # EXTERNAL AUTH
+            my ( $retval, $retcard, $retuserid ) = C4::Auth_with_shibboleth::checkpw_shib( $dbh, $shib_login );    # EXTERNAL AUTH
             ($retval) and return ( $retval, $retcard, $retuserid );
             return 0;
         }
diff --git a/C4/Auth_with_shibboleth.pm b/C4/Auth_with_shibboleth.pm
index 8dd3083..fddbc9d 100644
--- a/C4/Auth_with_shibboleth.pm
+++ b/C4/Auth_with_shibboleth.pm
@@ -1,4 +1,4 @@
-package C4::Auth_with_Shibboleth;
+package C4::Auth_with_shibboleth;
 
 # Copyright 2011 BibLibre
 #
diff --git a/opac/opac-main.pl b/opac/opac-main.pl
index 3e884ce..e0a7425 100755
--- a/opac/opac-main.pl
+++ b/opac/opac-main.pl
@@ -21,7 +21,7 @@
 use Modern::Perl;
 use CGI;
 use C4::Auth;    # get_template_and_user
-use C4::Auth_with_Shibboleth qw( login_shib_url );
+use C4::Auth_with_shibboleth qw( login_shib_url );
 use C4::Output;
 use C4::NewsChannels;    # GetNewsToDisplay
 use C4::Languages qw(getTranslatedLanguages accept_language);
@@ -48,7 +48,7 @@ $template->param(
 if ( C4::Context->config('useshibboleth') ) {
     $template->param(
         shibbolethAuthentication => C4::Context->config('useshibboleth'),
-        shibbolethLoginUrl => C4::Auth_with_Shibboleth::login_shib_url($input)
+        shibbolethLoginUrl => C4::Auth_with_shibboleth::login_shib_url($input)
     );
 };
 
-- 
1.7.10.4