X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=svc%2Fbib;h=ac7e4b06a1643a3dc3445eb9eddbd70325a29722;hb=6a7d1f448d880c00253f3f8d6442a0dc601cffc6;hp=b6df2e50a97af30f70cc873c92edb557a232a6c1;hpb=7ee7effc89e5b17b72d27d38e1eaa6acc28b35d2;p=koha.git diff --git a/svc/bib b/svc/bib index b6df2e50a9..ac7e4b06a1 100755 --- a/svc/bib +++ b/svc/bib @@ -19,14 +19,17 @@ # use strict; +use warnings; + use CGI; use C4::Auth qw/check_api_auth/; use C4::Biblio; use XML::Simple; my $query = new CGI; +binmode STDOUT, ":utf8"; -my ($status, $cookie, $sessionID) = check_api_auth($query, { editcatalogue => 1} ); +my ($status, $cookie, $sessionID) = check_api_auth($query, { editcatalogue => 'edit_catalogue'} ); unless ($status eq "ok") { print $query->header(-type => 'text/xml', -status => '403 Forbidden'); print XMLout({ auth_status => $status }, NoAttr => 1, RootName => 'response', XMLDecl => 1);