|
Lines 671-677
sub GeneratePatronAttributesForm {
Link Here
|
| 671 |
# or taken from the patron itself |
671 |
# or taken from the patron itself |
| 672 |
if ( defined $entered_attributes ) { |
672 |
if ( defined $entered_attributes ) { |
| 673 |
foreach my $attr (@$entered_attributes) { |
673 |
foreach my $attr (@$entered_attributes) { |
| 674 |
push @{ $attr_values{ $attr->{code} } }, $attr->{value}; |
674 |
push @{ $attr_values{ $attr->{code} } }, $attr->{attribute}; |
| 675 |
} |
675 |
} |
| 676 |
} |
676 |
} |
| 677 |
elsif ( defined $borrowernumber ) { |
677 |
elsif ( defined $borrowernumber ) { |
| 678 |
- |
|
|