From 9e253d7bced1d10d7e3975871db985debba5a497 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Wed, 17 Oct 2018 19:51:50 -0300 Subject: [PATCH] Bug 21596: Handle empty string for date_renewed when storing a patron Incorrect date value: '' for column 'date_renewed' Signed-off-by: Nick Clemens Signed-off-by: Martin Renvoize Signed-off-by: Nick Clemens --- Koha/Patron.pm | 1 + Koha/Patrons/Import.pm | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/Koha/Patron.pm b/Koha/Patron.pm index f9214a6eed..4c9f955a13 100644 --- a/Koha/Patron.pm +++ b/Koha/Patron.pm @@ -195,6 +195,7 @@ sub store { # We don't want invalid dates in the db (mysql has a bad habit of inserting 0000-00-00) $self->dateofbirth(undef) unless $self->dateofbirth; $self->debarred(undef) unless $self->debarred; + $self->date_renewed(undef) unless $self->date_renewed; # Set default values if not set $self->sms_provider_id(undef) unless $self->sms_provider_id; diff --git a/Koha/Patrons/Import.pm b/Koha/Patrons/Import.pm index 1adb32da5c..712c97882f 100644 --- a/Koha/Patrons/Import.pm +++ b/Koha/Patrons/Import.pm @@ -513,7 +513,7 @@ be formatted to the chosen date format. Populates the correctly formatted date o sub format_dates { my ($self, $params) = @_; - foreach my $date_type (qw(dateofbirth dateenrolled dateexpiry)) { + foreach my $date_type (qw(dateofbirth dateenrolled dateexpiry date_renewed)) { my $tempdate = $params->{borrower}->{$date_type} or next(); my $formatted_date = eval { output_pref( { dt => dt_from_string( $tempdate ), dateonly => 1, dateformat => 'iso' } ); }; -- 2.39.5