Lines 798-804
sub patron_attributes_form {
Link Here
|
798 |
}; |
798 |
}; |
799 |
if (exists $attr_hash{$attr_type->code()}) { |
799 |
if (exists $attr_hash{$attr_type->code()}) { |
800 |
foreach my $attr (@{ $attr_hash{$attr_type->code()} }) { |
800 |
foreach my $attr (@{ $attr_hash{$attr_type->code()} }) { |
801 |
my $newentry = { map { $_ => $entry->{$_} } %$entry }; |
801 |
my $newentry = { %$entry }; |
802 |
$newentry->{value} = $attr->{value}; |
802 |
$newentry->{value} = $attr->{value}; |
803 |
$newentry->{password} = $attr->{password}; |
803 |
$newentry->{password} = $attr->{password}; |
804 |
$newentry->{use_dropdown} = 0; |
804 |
$newentry->{use_dropdown} = 0; |
805 |
- |
|
|