Lines 228-236
if ( ( $op eq 'insert' ) and !$nodouble ) {
Link Here
|
228 |
$conditions->{firstname} = $newdata{firstname} if $newdata{firstname}; |
228 |
$conditions->{firstname} = $newdata{firstname} if $newdata{firstname}; |
229 |
$conditions->{dateofbirth} = $newdata{dateofbirth} if $newdata{dateofbirth}; |
229 |
$conditions->{dateofbirth} = $newdata{dateofbirth} if $newdata{dateofbirth}; |
230 |
} |
230 |
} |
|
|
231 |
$nodouble = 1; |
231 |
my $patrons = Koha::Patrons->search($conditions); |
232 |
my $patrons = Koha::Patrons->search($conditions); |
232 |
if ( $patrons->count > 0) { |
233 |
if ( $patrons->count > 0) { |
233 |
$nodouble = 1; |
234 |
$nodouble = 0; |
234 |
$check_member = $patrons->next->borrowernumber; |
235 |
$check_member = $patrons->next->borrowernumber; |
235 |
} |
236 |
} |
236 |
} |
237 |
} |
237 |
- |
|
|