[Koha-cvs] CVS: koha/circ branchtransfers.pl,1.19,1.20 circulation.pl,1.49,1.50 returns.pl,1.28,1.29

[Paul POULAIN]

Update of /cvsroot/koha/koha/circ
In directory sc8-pr-cvs1:/tmp/cvs-serv22223/circ

Modified Files:
        branchtransfers.pl circulation.pl returns.pl 
Log Message:
some fixes, and links to themelang/images

Index: branchtransfers.pl
===================================================================
RCS file: /cvsroot/koha/koha/circ/branchtransfers.pl,v
retrieving revision 1.19
retrieving revision 1.20
diff -C2 -r1.19 -r1.20
*** branchtransfers.pl  6 Feb 2003 05:10:54 -0000       1.19
--- branchtransfers.pl  11 Mar 2003 15:13:18 -0000      1.20
***************
*** 31,34 ****
--- 31,35 ----
  use C4::Interface::CGI::Output;
  use HTML::Template;
+ use C4::Koha;
  
  ###############################################
***************
*** 36,45 ****
  
  my %env;
- my $headerbackgroundcolor='#99cc33';
- my $circbackgroundcolor='#ffffcc';
- my $circbackgroundcolor='white';
  my $linecolor1='#ffffcc';
  my $linecolor2='white';
- my $backgroundimage="/images/background-mem.gif";
  
  my $branches = getbranches();
--- 37,42 ----
***************
*** 259,264 ****
                                                                printer => 
$printer,
                                                                found => $found,
-                                                               hdrbckgdcolor 
=> $headerbackgroundcolor,
-                                                               bckgdimg => 
$backgroundimage,
                                                                reserved => 
$reserved,
                                                                waiting => 
$waiting,
--- 256,259 ----

Index: circulation.pl
===================================================================
RCS file: /cvsroot/koha/koha/circ/circulation.pl,v
retrieving revision 1.49
retrieving revision 1.50
diff -C2 -r1.49 -r1.50
*** circulation.pl      10 Mar 2003 15:16:30 -0000      1.49
--- circulation.pl      11 Mar 2003 15:13:20 -0000      1.50
***************
*** 325,329 ****
                rejected => $rejected,
                message => $message,
!               CGIseleborrower => $CGIselectborrower,
  
                patrontable => $patrontable,
--- 325,329 ----
                rejected => $rejected,
                message => $message,
!               CGIselectborrower => $CGIselectborrower,
  
                patrontable => $patrontable,
***************
*** 455,459 ****
        $issues[$i]=$borrowerissues->{$_};
        my $dd=$issues[$i]->{'date_due'};
- #     warn $_,$dd;
        #convert to nz style dates
        #this should be set with some kinda config variable
--- 455,458 ----
***************
*** 465,469 ****
        $issues[$i]=$borroweriss2->{$_};
        my $dd=$issues[$i]->{'date_due'};
- #     warn $_,$dd;
        #convert to nz style dates
        #this should be set with some kinda config variable
--- 464,467 ----

Index: returns.pl
===================================================================
RCS file: /cvsroot/koha/koha/circ/returns.pl,v
retrieving revision 1.28
retrieving revision 1.29
diff -C2 -r1.28 -r1.29
*** returns.pl  6 Feb 2003 05:10:55 -0000       1.28
--- returns.pl  11 Mar 2003 15:13:24 -0000      1.29
***************
*** 35,39 ****
  use C4::Interface::CGI::Output;
  use HTML::Template;
! 
  
  my $query=new CGI;
--- 35,39 ----
  use C4::Interface::CGI::Output;
  use HTML::Template;
! use C4::Koha;
  
  my $query=new CGI;
***************
*** 51,59 ****
  my %env;
  my $headerbackgroundcolor='#99cc33';
- my $circbackgroundcolor='#ffffcc';
- my $circbackgroundcolor='white';
  my $linecolor1='#ffffcc';
  my $linecolor2='white';
- my $backgroundimage="/images/background-mem.gif";
  
  my $branches = getbranches();
--- 51,56 ----
***************
*** 371,376 ****
                        branch => $branch,
                        printer => $printer,
-                       hdrbckgdcolor => $headerbackgroundcolor,
-                       bckgdimg => $backgroundimage,
                        errmsgloop => address@hidden
                );
--- 368,371 ----