if ($userenv) {
my $borrowernumber = $userenv->{'number'};
if ($borrowernumber) {
$borrower = Koha::Patrons->find( { borrowernumber => $borrowernumber } );
my $borrower = Koha::Patrons->find( { borrowernumber => $borrowernumber } );
$borcat = $borrower ? $borrower->categorycode : $borcat;
}
-