|
Lines 614-620
foreach my $category_type (qw(C A S P I X)) {
Link Here
|
| 614 |
{ 'categorycode' => $patron_category->categorycode, |
614 |
{ 'categorycode' => $patron_category->categorycode, |
| 615 |
'categoryname' => $patron_category->description, |
615 |
'categoryname' => $patron_category->description, |
| 616 |
'categorycodeselected' => |
616 |
'categorycodeselected' => |
| 617 |
( ( defined( $borrower_data->{'categorycode'} ) && $patron_category->categorycode eq $borrower_data->{'categorycode'} ) || ( defined($categorycode) && $patron_category->categorycode eq $categorycode ) ), |
617 |
( defined($categorycode) && $patron_category->categorycode eq $categorycode ), |
| 618 |
}; |
618 |
}; |
| 619 |
} |
619 |
} |
| 620 |
my %typehash; |
620 |
my %typehash; |
| 621 |
- |
|
|