[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] CVS: koha/opac opac-shelves.pl,1.4,1.5
From: |
Owen Leonard |
Subject: |
[Koha-cvs] CVS: koha/opac opac-shelves.pl,1.4,1.5 |
Date: |
Thu, 27 Jan 2005 09:27:15 -0800 |
Update of /cvsroot/koha/koha/opac
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv648/opac
Modified Files:
opac-shelves.pl
Log Message:
Taking table cell background color information out of the script and moving it
into the template (requires update to opac-shelves.tmpl)
Index: opac-shelves.pl
===================================================================
RCS file: /cvsroot/koha/koha/opac/opac-shelves.pl,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -r1.4 -r1.5
*** opac-shelves.pl 13 Jan 2005 20:41:07 -0000 1.4
--- opac-shelves.pl 27 Jan 2005 17:27:11 -0000 1.5
***************
*** 34,42 ****
my $env;
my $query = new CGI;
- my $headerbackgroundcolor='#663266';
- my $circbackgroundcolor='#555555';
- my $circbackgroundcolor='#550000';
- my $linecolor1='#bbbbbb';
- my $linecolor2='#dddddd';
my ($template, $loggedinuser, $cookie)
= get_template_and_user({template_name => "opac-shelves.tmpl",
--- 34,37 ----
***************
*** 95,99 ****
foreach my $element (sort keys %$shelflist) {
my %line;
! ($color eq $linecolor1) ? ($color=$linecolor2) :
($color=$linecolor1);
$line{'color'}= $color;
$line{'shelf'}=$element;
--- 90,94 ----
foreach my $element (sort keys %$shelflist) {
my %line;
! ($color eq 0) ? ($color=1) : ($color=0);
$line{'color'}= $color;
$line{'shelf'}=$element;
***************
*** 147,151 ****
foreach my $element (sort keys %$shelflist) {
my %line;
! ($color eq $linecolor1) ? ($color=$linecolor2) :
($color=$linecolor1);
$line{'color'}=$color;
$line{'shelf'}=$element;
--- 142,146 ----
foreach my $element (sort keys %$shelflist) {
my %line;
! ($color eq 0) ? ($color=1) : ($color=0);
$line{'color'}=$color;
$line{'shelf'}=$element;
***************
*** 169,173 ****
foreach $item (sort {$a->{'barcode'} cmp $b->{'barcode'}} @$itemlist) {
my %line;
! ($color eq $linecolor1) ? ($color=$linecolor2) :
($color=$linecolor1);
$line{'color'}=$color;
$line{'itemnumber'}=$item->{'itemnumber'};
--- 164,168 ----
foreach $item (sort {$a->{'barcode'} cmp $b->{'barcode'}} @$itemlist) {
my %line;
! ($color eq 0) ? ($color=1) : ($color=0);
$line{'color'}=$color;
$line{'itemnumber'}=$item->{'itemnumber'};
***************
*** 190,193 ****
--- 185,191 ----
#
# $Log$
+ # Revision 1.5 2005/01/27 17:27:11 oleonard
+ # Taking table cell background color information out of the script and moving
it into the template (requires update to opac-shelves.tmpl)
+ #
# Revision 1.4 2005/01/13 20:41:07 oleonard
# Adding call number and item type to list of returned variables
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Koha-cvs] CVS: koha/opac opac-shelves.pl,1.4,1.5,
Owen Leonard <=