Bug 7743: Update opac-account.pl to use KohaDates TT plugin

Signed-off-by: Marijana Glavica <mglavica@ffzg.hr>

koha-tmpl/opac-tmpl/prog/en/modules/opac-account.tt

@@ -1,3 +1,5 @@
+[% USE KohaDates %]
+
 [% INCLUDE 'doc-head-open.inc' %][% IF ( LibraryNameTitle ) %][% LibraryNameTitle %][% ELSE %]Koha Online[% END %] Catalog › Your fines and charges
 [% INCLUDE 'doc-head-close.inc' %]
 </head>
@@ -35,7 +37,7 @@
             <tbody>
                 [% FOREACH ACCOUNT_LINE IN ACCOUNT_LINES %]
                     [% IF ( ACCOUNT_LINE.odd ) %]<tr class="highlight">[% ELSE %]<tr>[% END %]
-                        <td>[% ACCOUNT_LINE.date %]</td>
+                        <td>[% ACCOUNT_LINE.date | $KohaDates %]</td>
                         <td>[% ACCOUNT_LINE.description %]
                         [% IF ( ACCOUNT_LINE.title ) %][% ACCOUNT_LINE.title |html %][% END %]</td>
                         [% IF ( ACCOUNT_LINE.amountcredit ) %]<td class="credit">[% ELSE %]<td class="debit">[% END %][% ACCOUNT_LINE.amount %]</td>

opac/opac-account.pl

@@ -24,7 +24,6 @@ use C4::Members;
 use C4::Circulation;
 use C4::Auth;
 use C4::Output;
-use C4::Dates qw/format_date/;
 use warnings;
 
 my $query = new CGI;
@@ -50,7 +49,6 @@ $template->param( BORROWER_INFO => \@bordat );
 my ( $total , $accts, $numaccts) = GetMemberAccountRecords( $borrowernumber );
 
 for ( my $i = 0 ; $i < $numaccts ; $i++ ) {
-    $accts->[$i]{'date'} = format_date( $accts->[$i]{'date'} );
     $accts->[$i]{'amount'} = sprintf( "%.2f", $accts->[$i]{'amount'} || '0.00');
     if ( $accts->[$i]{'amount'} >= 0 ) {
         $accts->[$i]{'amountcredit'} = 1;