report missing marc_remove

[webpac2] / vhost / ecas / html.pm

diff --git a/vhost/ecas/html.pm b/vhost/ecas/html.pm
index f2bfb7f..c09661b 100644 (file)
--- a/vhost/ecas/html.pm
+++ b/vhost/ecas/html.pm
@@ -30,8 +30,8 @@ sub urlf {
 
 sub urlebsco {
        my ($self,$urlebsco) = @_;
-       my $cpid = $urlebsco . '&authtype=cpid&custid=s4311509';
-       qq{ <a target="ecas" href="$cpid">Pristup od kuće</a> };
+       my $shib = $urlebsco . '&authtype=shib';
+       qq{ <a target="ecas" href="$shib">Pristup od kuće</a> };
 }
 
 #sub publisher {