--- 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++) {