koha-cvs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Koha-cvs] CVS: koha/circ circulation.pl,1.23,1.23.2.1


From: Steve Tonnesen
Subject: [Koha-cvs] CVS: koha/circ circulation.pl,1.23,1.23.2.1
Date: Mon, 24 Jun 2002 15:12:24 -0700

Update of /cvsroot/koha/koha/circ
In directory usw-pr-cvs1:/tmp/cvs-serv22218

Modified Files:
      Tag: rel-1-2
        circulation.pl 
Log Message:
Change reference to blackdot.gif to remove leading /koha/ dir.


Index: circulation.pl
===================================================================
RCS file: /cvsroot/koha/koha/circ/circulation.pl,v
retrieving revision 1.23
retrieving revision 1.23.2.1
diff -C2 -r1.23 -r1.23.2.1
*** circulation.pl      14 Mar 2002 01:50:17 -0000      1.23
--- circulation.pl      24 Jun 2002 22:12:22 -0000      1.23.2.1
***************
*** 400,408 ****
            my $overduetext="$duedate";
            ($overduetext="<font color=red>$duedate</font>") if ($duedate lt 
$todaysdate);
!           ($duedate) || ($overduetext="<img src=/koha/images/blackdot.gif>");
            my $borrowernumber=$riborrowernumber{$_};
            my ($borrower) = getpatroninformation(\%env,$borrowernumber,0);
            my ($iteminformation) = getiteminformation(\%env, 0, $barcode);
!           print "<tr><td bgcolor=$color>$overduetext</td><td bgcolor=$color 
align=center><a 
href=/cgi-bin/koha/detail.pl?bib=$iteminformation->{'biblionumber'}&type=intra 
onClick=\"openWindow(this, 'Item', 480, 640)\">$barcode</a></td><td 
bgcolor=$color>$iteminformation->{'title'}</td><td 
bgcolor=$color>$iteminformation->{'author'}</td><td bgcolor=$color 
align=center>$iteminformation->{'itemtype'}</td><td bgcolor=$color><img 
src=/koha/images/blackdot.gif><a 
href=/cgi-bin/koha/moremember.pl?bornum=$borrower->{'borrowernumber'} 
onClick=\"openWindow(this,'Member', 480, 640)\">$borrower->{'cardnumber'}</a> 
$borrower->{'firstname'} $borrower->{'surname'}</td></tr>\n";
          } else {
            last
--- 400,408 ----
            my $overduetext="$duedate";
            ($overduetext="<font color=red>$duedate</font>") if ($duedate lt 
$todaysdate);
!           ($duedate) || ($overduetext="<img src=/images/blackdot.gif>");
            my $borrowernumber=$riborrowernumber{$_};
            my ($borrower) = getpatroninformation(\%env,$borrowernumber,0);
            my ($iteminformation) = getiteminformation(\%env, 0, $barcode);
!           print "<tr><td bgcolor=$color>$overduetext</td><td bgcolor=$color 
align=center><a 
href=/cgi-bin/koha/detail.pl?bib=$iteminformation->{'biblionumber'}&type=intra 
onClick=\"openWindow(this, 'Item', 480, 640)\">$barcode</a></td><td 
bgcolor=$color>$iteminformation->{'title'}</td><td 
bgcolor=$color>$iteminformation->{'author'}</td><td bgcolor=$color 
align=center>$iteminformation->{'itemtype'}</td><td bgcolor=$color><img 
src=/images/blackdot.gif><a 
href=/cgi-bin/koha/moremember.pl?bornum=$borrower->{'borrowernumber'} 
onClick=\"openWindow(this,'Member', 480, 640)\">$borrower->{'cardnumber'}</a> 
$borrower->{'firstname'} $borrower->{'surname'}</td></tr>\n";
          } else {
            last




reply via email to

[Prev in Thread] Current Thread [Next in Thread]