From 48b4d54408223a186d218fe7d74f21f7d3748418 Mon Sep 17 00:00:00 2001
From: Chris Cormack <crc@liblime.com>
Date: Sun, 30 Dec 2007 19:19:09 -0600
Subject: [PATCH] Fix for bug 1515

Signed-off-by: Joshua Ferraro <jmf@liblime.com>
---
 C4/Members.pm                                               | 2 +-
 circ/circulation.pl                                         | 3 +--
 .../intranet-tmpl/prog/en/modules/circ/circulation.tmpl     | 6 ++++++
 3 files changed, 8 insertions(+), 3 deletions(-)

diff --git a/C4/Members.pm b/C4/Members.pm
index 2843d51698..d95b883261 100644
--- a/C4/Members.pm
+++ b/C4/Members.pm
@@ -426,7 +426,7 @@ sub patronflags {
     elsif ( $amount < 0 ) {
         my %flaginfo;
         $flaginfo{'message'} = sprintf "Patron has credit of \$%.02f", -$amount;
-        $flags{'CHARGES'} = \%flaginfo;
+        $flags{'CREDITS'} = \%flaginfo;
     }
     if (   $patroninformation->{'gonenoaddress'}
         && $patroninformation->{'gonenoaddress'} == 1 )
diff --git a/circ/circulation.pl b/circ/circulation.pl
index 049233063e..6d9ab9b030 100755
--- a/circ/circulation.pl
+++ b/circ/circulation.pl
@@ -458,7 +458,6 @@ if ($borrower) {
     my $i = 1;
 	foreach my $book (@todaysissues) {
         $book->{'togglecolor'} = (++$i % 2) ? 0 : 1 ;
-		warn $book->{'timestamp'};
     }
     $i = 1;
 	foreach my $book (@previousissues) {
@@ -536,7 +535,7 @@ my $flags = $borrower->{'flags'};
 my $flag;
 
 foreach $flag ( sort keys %$flags ) {
-
+    $template->param( flagged=> 1);
     $flags->{$flag}->{'message'} =~ s/\n/<br>/g;
     if ( $flags->{$flag}->{'noissues'} ) {
         $template->param(
diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/circ/circulation.tmpl b/koha-tmpl/intranet-tmpl/prog/en/modules/circ/circulation.tmpl
index 2d7f5b5717..5a9a481796 100755
--- a/koha-tmpl/intranet-tmpl/prog/en/modules/circ/circulation.tmpl
+++ b/koha-tmpl/intranet-tmpl/prog/en/modules/circ/circulation.tmpl
@@ -301,6 +301,12 @@ No patron matched <span class="ex"><!-- TMPL_VAR name="message" --></span>
             Make <a href="/cgi-bin/koha/members/pay.pl?borrowernumber=<!-- TMPL_VAR name="borrowernumber" -->">Payment</a></li>
 			<!-- /TMPL_IF -->
 
+        	<!-- TMPL_IF NAME="credits" -->
+			<li><span class="circ-hlt">Credits:</span> Patron has a credit</li>
+			<!-- /TMPL_IF -->
+
+			
+
 			</ul>
         </div>
 
-- 
2.39.5