Attachment #73581 for bug #19935

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

Lines 36-42 sub can_be_discharged { Link Here

(-)a/Koha/Patron/Discharge.pm (-1 / +1 lines)
36	my $patron = Koha::Patrons->find( $params->{borrowernumber} );	36	my $patron = Koha::Patrons->find( $params->{borrowernumber} );
37	return unless $patron;	37	return unless $patron;
38		38
39	my $has_pending_checkouts = $patron->pending_checkouts->count;	39	my $has_pending_checkouts = $patron->checkouts->count;
40	return $has_pending_checkouts ? 0 : 1;	40	return $has_pending_checkouts ? 0 : 1;
41	}	41	}
42		42

Lines 75-81 if ( C4::Context->preference('NorwegianPatronDBEnable') && C4::Context->preferen Link Here

(-)a/members/deletemem.pl (-2 / +1 lines)
75	}	75	}
76		76
77	my $charges = $patron->account->non_issues_charges;	77	my $charges = $patron->account->non_issues_charges;
78	my $countissues = $patron->pending_checkouts->count;	78	my $countissues = $patron->checkouts->count;
79	my $userenv = C4::Context->userenv;	79	my $userenv = C4::Context->userenv;
80		80
81	if ($patron->category->category_type eq "S") {	81	if ($patron->category->category_type eq "S") {
82	-

Return to bug 19935