Bug 14985: Fix regression on patron search
authorJonathan Druart <jonathan.druart@bugs.koha-community.org>
Wed, 11 Nov 2015 12:03:51 +0000 (12:03 +0000)
committerTomas Cohen Arazi <tomascohen@theke.io>
Fri, 13 Nov 2015 14:24:54 +0000 (11:24 -0300)
This patch fixes 2 major errors introduced by last patch:
1/ Undefined subroutine &C4::Utils::DataTables::Members::dt_from_string
called
when searching for patrons
2/ Display the dates on the patron search in the pref format, not iso

Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Signed-off-by: Tomas Cohen Arazi <tomascohen@theke.io>

C4/Utils/DataTables/Members.pm

index 5e0b812..bfa73e0 100644 (file)
@@ -1,10 +1,11 @@
 package C4::Utils::DataTables::Members;
 
+use Modern::Perl;
 use C4::Branch qw/onlymine/;
 use C4::Context;
 use C4::Members qw/GetMemberIssuesAndFines/;
 use C4::Utils::DataTables;
-use Modern::Perl;
+use Koha::DateUtils;
 
 sub search {
     my ( $params ) = @_;
@@ -142,7 +143,7 @@ sub search {
         ($patron->{overdues}, $patron->{issues}, $patron->{fines}) =
             GetMemberIssuesAndFines($patron->{borrowernumber});
         if($patron->{dateexpiry} and $patron->{dateexpiry} ne '0000-00-00') {
-            $patron->{dateexpiry} = output_pref( { dt => dt_from_string( $patron->{dateexpiry}), dateonly => 1, dateformat => 'iso' } );
+            $patron->{dateexpiry} = output_pref( { dt => dt_from_string( $patron->{dateexpiry}, 'iso'), dateonly => 1} );
         } else {
             $patron->{dateexpiry} = '';
         }