Lines 437-443
if ((!$nok) and $nodouble and ($op eq 'insert' or $op eq 'save')){
Link Here
|
437 |
} else { |
437 |
} else { |
438 |
# FIXME Urgent error handling here, we cannot fail without relevant feedback |
438 |
# FIXME Urgent error handling here, we cannot fail without relevant feedback |
439 |
# Lot of code will need to be removed from this script to handle exceptions raised by Koha::Patron->store |
439 |
# Lot of code will need to be removed from this script to handle exceptions raised by Koha::Patron->store |
440 |
warn "Patron creation failed! - $@"; # Maybe we must die instead of just warn |
440 |
warn "Patron creation failed! - $_"; # Maybe we must die instead of just warn |
441 |
push @messages, {error => 'error_on_insert_patron'}; |
441 |
push @messages, {error => 'error_on_insert_patron'}; |
442 |
} |
442 |
} |
443 |
$op = "add"; |
443 |
$op = "add"; |
444 |
- |
|
|