View | Details | Raw Unified | Return to bug 13108
Collapse All | Expand All

(-)a/opac/opac-reserve.pl (-2 / +2 lines)
Lines 35-40 use C4::Branch; # GetBranches Link Here
35 
use C4::Overdues;
 35 
use C4::Overdues;
36 
use C4::Debug;
 36 
use C4::Debug;
37 
use Koha::DateUtils;
 37 
use Koha::DateUtils;
38 
use Koha::Borrower::Debarments qw(IsDebarred);
38 
use Date::Calc qw/Today Date_to_Days/;
 39 
use Date::Calc qw/Today Date_to_Days/;
39 
# use Data::Dumper;
 40 
# use Data::Dumper;
40 

          41
          

        

  

    
      
            Lines 320-326
          if ( $borr->{lost} && ($borr->{lost} == 1) ) {
      
      
        Link Here
      
    
  

        

          320
          
        lost    => 1

          321
          
        lost    => 1

        

        

          321
          
    );

          322
          
    );

        

        

          322
          
}

          323
          
}

        

          
            

              323
              
if ( $borr->{'debarred'} ) {


              324
              
if ( IsDebarred($borrowernumber) ) {

            

        

          324
          
    $noreserves = 1;

          325
          
    $noreserves = 1;

        

        

          325
          
    $template->param(

          326
          
    $template->param(

        

        

          326
          
        message  => 1,

          327
          
        message  => 1,

        

            

              327
              
- 

              
              
            






  

  Return to bug 13108