Bug 15344: Remove some other calls of GetMemberDetails from pl scripts

[koha.git] / opac / opac-account.pl

diff --git a/opac/opac-account.pl b/opac/opac-account.pl
index 9c0717d..d220fed 100755 (executable)
--- a/opac/opac-account.pl
+++ b/opac/opac-account.pl
@@ -34,17 +34,12 @@ my ( $template, $borrowernumber, $cookie ) = get_template_and_user(
         query           => $query,
         type            => "opac",
         authnotrequired => 0,
-        flagsrequired   => { borrow => 1 },
         debug           => 1,
     }
 );
 
-# get borrower information ....
-my $borr = GetMemberDetails( $borrowernumber );
-my @bordat;
-$bordat[0] = $borr;
-
-$template->param( BORROWER_INFO => \@bordat );
+my $borrower = C4::Members::GetMember( borrowernumber => $borrowernumber );
+$template->param( BORROWER_INFO => $borrower );
 
 #get account details
 my ( $total , $accts, $numaccts) = GetMemberAccountRecords( $borrowernumber );
@@ -75,5 +70,4 @@ $template->param (
        accountview => 1
 );
 
-output_html_with_http_headers $query, $cookie, $template->output;
-
+output_html_with_http_headers $query, $cookie, $template->output, undef, { force_no_caching => 1 };