[Koha-cvs] CVS: koha/circ circulation.pl,1.56,1.57

[Jerome Vizcaino]

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

Modified Files:
        circulation.pl 
Log Message:
Added allowborrow to the template parameters to check if a borrower can borrow 
books or not according to the "borrow" flag.


Index: circulation.pl
===================================================================
RCS file: /cvsroot/koha/koha/circ/circulation.pl,v
retrieving revision 1.56
retrieving revision 1.57
diff -C2 -r1.56 -r1.57
*** circulation.pl      26 Jun 2003 09:31:39 -0000      1.56
--- circulation.pl      1 Jul 2003 11:22:48 -0000       1.57
***************
*** 203,207 ****
--- 203,211 ----
  my @realtodayissues;
  my @realprevissues;
+ my $allowborrow;
+ my $hash;
  if ($borrower) {
+     ($borrower, $flags,$hash) = getpatroninformation(\%env,$borrowernumber,0);
+     $allowborrow= $hash->{'borrow'};
      my @todaysissues;
      my @previousissues;
***************
*** 230,242 ****
        $book->{'tcolor'}=$tcolor;
        push @realtodayissues,$book
!     }
      # FIXME - For small and private libraries, it'd be nice if this
      # table included a "Return" link next to each book, so that you
      # don't have to remember the book's bar code and type it in on the
      # "Returns" page.
!     
      # This is in the template now, so its possible for a small library to 
make that link in their
      # template
!     
      foreach my $book (sort {$a->{'date_due'} cmp $b->{'date_due'}} 
@previousissues){
        my $dd = $book->{'date_due'};
--- 234,246 ----
        $book->{'tcolor'}=$tcolor;
        push @realtodayissues,$book
! }
      # FIXME - For small and private libraries, it'd be nice if this
      # table included a "Return" link next to each book, so that you
      # don't have to remember the book's bar code and type it in on the
      # "Returns" page.
! 
      # This is in the template now, so its possible for a small library to 
make that link in their
      # template
! 
      foreach my $book (sort {$a->{'date_due'} cmp $b->{'date_due'}} 
@previousissues){
        my $dd = $book->{'date_due'};
***************
*** 296,299 ****
--- 300,304 ----
                branchname => $branches->{$branch}->{'branchname'},
                printername => $printers->{$printer}->{'printername'},
+               allowborrow =>$allowborrow,
  
                #question form