Bug 20832: Fix opac user profile page when there is overdue fine and no rental charge

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

diff --git a/opac/opac-privacy.pl b/opac/opac-privacy.pl
index 622b9f5..8796a7a 100755 (executable)
--- a/opac/opac-privacy.pl
+++ b/opac/opac-privacy.pl
@@ -60,13 +60,16 @@ if ( $op eq "update_privacy" ) {
 elsif ( $op eq "delete_record" ) {
 
     # delete all reading records for items returned
-    # uses a hardcoded date ridiculously far in the future
-
     my $rows = eval {
-        Koha::Patrons->search({ 'me.borrowernumber' => $borrowernumber })->anonymise_issue_history( { before => '2999-12-12' } );
+        Koha::Patrons->search({ 'me.borrowernumber' => $borrowernumber })->anonymise_issue_history;
     };
-    $rows = $@ ? 0 : int($rows);
-    $template->param( 'deleted' => $rows );
+    $template->param(
+        (
+              $@    ? ( history_not_deleted => 1 )
+            : $rows ? ( deleted             => int($rows) )
+            :         ( nothing_to_delete => 1 )
+        )
+    );
 }
 
 # get borrower privacy ....