@@ -, +, @@
---------
borrower number.
-- nice error, but it is only the card number.
-- nice error, but it is now more informative.
---
koha-tmpl/intranet-tmpl/prog/en/modules/tools/modborrowers.tt | 7 +++++--
tools/modborrowers.pl | 6 +++++-
2 files changed, 10 insertions(+), 3 deletions(-)
--- a/koha-tmpl/intranet-tmpl/prog/en/modules/tools/modborrowers.tt
+++ a/koha-tmpl/intranet-tmpl/prog/en/modules/tools/modborrowers.tt
@@ -199,7 +199,10 @@
[% FOREACH error IN errors %]
[% IF ( error.error == 'can_not_update' ) %]
- - Can not update patron with borrowernumber [% error.borrowernumber %]
+ - Can not update patron.
+ [% IF ( error.cardnumber ) %] Cardnumber: [% error.cardnumber %] [% END %]
+ (Borrowernumber: [% error.borrowernumber %])
+
[% ELSE %]
- [% error.error %]
[% END %]
@@ -379,4 +382,4 @@
[% INCLUDE 'tools-menu.inc' %]
-[% INCLUDE 'intranet-bottom.inc' %]
+[% INCLUDE 'intranet-bottom.inc' %]
--- a/tools/modborrowers.pl
+++ a/tools/modborrowers.pl
@@ -272,7 +272,11 @@ if ( $op eq 'do' ) {
if ( defined $infos ) {
$infos->{borrowernumber} = $borrowernumber;
my $success = ModMember(%$infos);
- push @errors, { error => "can_not_update", borrowernumber => $infos->{borrowernumber} } if not $success;
+ if (!$success) {
+ my $borrowerinfo = GetBorrowerInfos( borrowernumber => $borrowernumber );
+ $infos->{cardnumber} = $borrowerinfo->{cardnumber} || '';
+ push @errors, { error => "can_not_update", borrowernumber => $infos->{borrowernumber}, cardnumber => $infos->{cardnumber} };
+ }
}
#
--