#1255 : flagged patron can't renew

Signed-off-by: Chris Cormack <crc@liblime.com>
Signed-off-by: Joshua Ferraro <jmf@liblime.com>

diff --git a/koha-tmpl/opac-tmpl/prog/en/opac-user.tmpl b/koha-tmpl/opac-tmpl/prog/en/opac-user.tmpl
index 1c7f1e5..ac6549f 100644 (file)
--- a/koha-tmpl/opac-tmpl/prog/en/opac-user.tmpl
+++ b/koha-tmpl/opac-tmpl/prog/en/opac-user.tmpl
@@ -108,7 +108,7 @@
         <th colspan="2">Title</th>
         <th>Call No.</th>
         <th>Due</th>
-        <th>Renew</th>
+        <!-- TMPL_UNLESS name="patron_flagged" --><th>Renew</th><!-- /TMPL_UNLESS -->
         <th>Fines</th>
         </tr>
         <!-- TMPL_LOOP NAME="ISSUES" -->
@@ -136,6 +136,7 @@
                 <!-- TMPL_ELSE -->
                     <td><!-- TMPL_VAR NAME="date_due" --></td>
                 <!-- /TMPL_IF -->
+                <!-- TMPL_UNLESS name="patron_flagged" -->
                 <td>
                     <!-- TMPL_IF NAME="status" -->
                         <a href="/cgi-bin/koha/opac-renew.pl?from=opac_user&amp;item=<!-- TMPL_VAR NAME="itemnumber" -->&amp;borrowernumber=<!-- TMPL_VAR NAME="borrowernumber" -->">Renew</a>
@@ -143,6 +144,7 @@
                         Not renewable
                     <!-- /TMPL_IF -->
                 </td>
+                <!-- /TMPL_UNLESS -->
                 <td><!-- TMPL_IF NAME="charges" -->Yes<!-- TMPL_ELSE -->No<!-- /TMPL_IF --></td>
             </tr>
         <!-- /TMPL_LOOP -->

diff --git a/opac/opac-user.pl b/opac/opac-user.pl
index a6f385f..78bdd71 100755 (executable)
--- a/opac/opac-user.pl
+++ b/opac/opac-user.pl
@@ -55,7 +55,8 @@ $borr->{'ethnicity'}    = fixEthnicity( $borr->{'ethnicity'} );
 if ( $borr->{'debarred'} || $borr->{'gonenoaddress'} || $borr->{'lost'} ) {
     $borr->{'flagged'} = 1;
 }
-
+# $make flagged available everywhere in the template
+my $patron_flagged = $borr->{'flagged'};
 if ( $borr->{'amountoutstanding'} > 5 ) {
     $borr->{'amountoverfive'} = 1;
 }
@@ -72,8 +73,10 @@ $borr->{'amountoutstanding'} = sprintf "%.02f", $borr->{'amountoutstanding'};
 my @bordat;
 $bordat[0] = $borr;
 
-$template->param( BORROWER_INFO  => \@bordat );
-$template->param( borrowernumber => $borrowernumber );
+$template->param(   BORROWER_INFO  => \@bordat,
+                    borrowernumber => $borrowernumber,
+                    patron_flagged => $patron_flagged,
+                );
 
 #get issued items ....
 my ($countissues,$issues) = GetPendingIssues($borrowernumber);