--- C4/Auth_with_ldap.pm 2010-02-20 21:41:34.000000000 +0100 +++ /usr/share/koha/lib/C4/Auth_with_ldap.pm 2010-02-20 22:47:57.000000000 +0100 @@ -160,6 +160,7 @@ my @types = C4::Members::AttributeTypes::GetAttributeTypes(); my @attributes = grep{my $key=$_; any{$_ eq $key}@types;} keys %borrower; my $extended_patron_attributes = map{{code=>$_,value=>$borrower{$_}}}@attributes; + my $extended_patron_attributes = [] unless $extended_patron_attributes; my @errors; #Check before add for (my $i; $i< scalar(@$extended_patron_attributes)-1;$i++) {