View | Details | Raw Unified | Return to bug 20443
Collapse All | Expand All

(-)a/members/memberentry.pl (-3 / +2 lines)
Lines 436-442 if ((!$nok) and $nodouble and ($op eq 'insert' or $op eq 'save')){ Link Here
436
	if ($op eq 'insert'){
436
	if ($op eq 'insert'){
437
		# we know it's not a duplicate borrowernumber or there would already be an error
437
		# we know it's not a duplicate borrowernumber or there would already be an error
438
        delete $newdata{password2};
438
        delete $newdata{password2};
439
        my $patron = eval { Koha::Patron->new(\%newdata)->store };
439
        $patron = eval { Koha::Patron->new(\%newdata)->store };
440
        if ( $@ ) {
440
        if ( $@ ) {
441
            # FIXME Urgent error handling here, we cannot fail without relevant feedback
441
            # FIXME Urgent error handling here, we cannot fail without relevant feedback
442
            # Lot of code will need to be removed from this script to handle exceptions raised by Koha::Patron->store
442
            # Lot of code will need to be removed from this script to handle exceptions raised by Koha::Patron->store
Lines 532-538 if ((!$nok) and $nodouble and ($op eq 'insert' or $op eq 'save')){ Link Here
532
            delete $newdata{'userid'};
532
            delete $newdata{'userid'};
533
        }
533
        }
534
534
535
        my $patron = Koha::Patrons->find( $borrowernumber );
535
        $patron = Koha::Patrons->find( $borrowernumber );
536
        $newdata{debarredcomment} = $newdata{debarred_comment};
536
        $newdata{debarredcomment} = $newdata{debarred_comment};
537
        delete $newdata{debarred_comment};
537
        delete $newdata{debarred_comment};
538
        delete $newdata{password2};
538
        delete $newdata{password2};
539
- 

Return to bug 20443