# Check the user's permissions
my %cookies = fetch CGI::Cookie;
my $sessid = $cookies{'CGISESSID'}->value || $input->param('CGISESSID');
my ($auth_status, $auth_sessid) = C4::Auth::check_cookie_auth($sessid, {"circulate_remaining_permissions" => '1'});
my ($auth_status, $auth_sessid) = C4::Auth::check_cookie_auth($sessid, {circulate => 'circulate_remaining_permissions'});
if ($auth_status ne "ok") {
print $input->header;
print "UNAUTHORIZED";
-