From 85df96cc2938018bbd647abc0dd04f62492b5b6e Mon Sep 17 00:00:00 2001
From: Paul Poulain <paul.poulain@biblibre.com>
Date: Wed, 19 Jan 2011 21:24:43 +0100
Subject: [PATCH] Bug 5630 : MT4704: Fix multiple CAS authentication

---
 C4/Auth.pm |    5 +----
 1 files changed, 1 insertions(+), 4 deletions(-)

diff --git a/C4/Auth.pm b/C4/Auth.pm
index 122737e..e04dd86 100644
--- a/C4/Auth.pm
+++ b/C4/Auth.pm
@@ -961,14 +961,11 @@ sub checkauth {
     if ($cas) {
 
 	# Is authentication against multiple CAS servers enabled?
-
         if (C4::Auth_with_cas::multipleAuth && !$casparam) {
 	    my $casservers = C4::Auth_with_cas::getMultipleAuth();		    
-#	    warn Data::Dumper::Dumper($casservers);
 	    my @tmplservers;
 	    foreach my $key (keys %$casservers) {
-	    warn $key, $casservers->{$key};
-		push @tmplservers, {name => $key, value => login_cas_url($query, $key)};
+		push @tmplservers, {name => $key, value => login_cas_url($query, $key) . "?cas=$key" };
 	    }
 	    #warn Data::Dumper::Dumper(\@tmplservers);
 	    $template->param(
-- 
1.7.1