|
Lines 957-968
sub patron_attributes_form {
Link Here
|
| 957 |
push @{$items_by_class{$attr_type->class()}}, $newentry; |
957 |
push @{$items_by_class{$attr_type->class()}}, $newentry; |
| 958 |
} |
958 |
} |
| 959 |
} |
959 |
} |
| 960 |
while ( my ($class, @items) = each %items_by_class ) { |
960 |
for my $class ( sort keys %items_by_class ) { |
| 961 |
my $av = Koha::AuthorisedValues->search({ category => 'PA_CLASS', authorised_value => $class }); |
961 |
my $av = Koha::AuthorisedValues->search({ category => 'PA_CLASS', authorised_value => $class }); |
| 962 |
my $lib = $av->count ? $av->next->lib : $class; |
962 |
my $lib = $av->count ? $av->next->lib : $class; |
| 963 |
push @attribute_loop, { |
963 |
push @attribute_loop, { |
| 964 |
class => $class, |
964 |
class => $class, |
| 965 |
items => @items, |
965 |
items => @{$items_by_class{$class}}, |
| 966 |
lib => $lib, |
966 |
lib => $lib, |
| 967 |
} |
967 |
} |
| 968 |
} |
968 |
} |
| 969 |
- |
|
|