| 
      
            Lines 261-267
          sub AddReserve {
      
      
        Link Here
      
     | 
  
        
          | 261 | 
              )->store();  | 
          261 | 
              )->store();  | 
        
        
          | 262 | 
              $hold->set_waiting() if $found && $found eq 'W';  | 
          262 | 
              $hold->set_waiting() if $found && $found eq 'W';  | 
        
        
          | 263 | 
           | 
          263 | 
           | 
        
          
            
              | 264 | 
                  logaction( 'HOLDS', 'CREATE', $hold->id, Dumper($hold->unblessed) )  | 
              264 | 
                  logaction( 'HOLDS', 'CREATE', $hold->id, $hold )  | 
            
        
          | 265 | 
                  if C4::Context->preference('HoldsLog'); | 
          265 | 
                  if C4::Context->preference('HoldsLog'); | 
        
        
          | 266 | 
           | 
          266 | 
           | 
        
        
          | 267 | 
              my $reserve_id = $hold->id();  | 
          267 | 
              my $reserve_id = $hold->id();  | 
        
  
    | 
      
            Lines 1060-1066
          sub ModReserve {
      
      
        Link Here
      
     | 
  
        
          | 1060 | 
                  $hold->expirationdate(dt_from_string($date))->store();  | 
          1060 | 
                  $hold->expirationdate(dt_from_string($date))->store();  | 
        
        
          | 1061 | 
              }  | 
          1061 | 
              }  | 
        
        
          | 1062 | 
              elsif ($rank =~ /^\d+/ and $rank > 0) { | 
          1062 | 
              elsif ($rank =~ /^\d+/ and $rank > 0) { | 
        
          
            
              | 1063 | 
                      logaction( 'HOLDS', 'MODIFY', $hold->reserve_id, Dumper($hold->unblessed) )  | 
              1063 | 
                      logaction( 'HOLDS', 'MODIFY', $hold->reserve_id, $hold )  | 
            
        
          | 1064 | 
                      if C4::Context->preference('HoldsLog'); | 
          1064 | 
                      if C4::Context->preference('HoldsLog'); | 
        
        
          | 1065 | 
           | 
          1065 | 
           | 
        
        
          | 1066 | 
                  my $properties = { | 
          1066 | 
                  my $properties = { | 
        
  
    | 
      
            Lines 1122-1128
          sub ModReserveFill {
      
      
        Link Here
      
     | 
  
        
          | 1122 | 
                  }  | 
          1122 | 
                  }  | 
        
        
          | 1123 | 
              );  | 
          1123 | 
              );  | 
        
        
          | 1124 | 
           | 
          1124 | 
           | 
        
          
            
              | 1125 | 
                  logaction( 'HOLDS', 'MODIFY', $hold->reserve_id, Dumper($hold->unblessed) )  | 
              1125 | 
                  logaction( 'HOLDS', 'MODIFY', $hold->reserve_id, $hold )  | 
            
        
          | 1126 | 
                  if C4::Context->preference('HoldsLog'); | 
          1126 | 
                  if C4::Context->preference('HoldsLog'); | 
        
        
          | 1127 | 
           | 
          1127 | 
           | 
        
        
          | 1128 | 
              # FIXME Must call Koha::Hold->cancel ? => No, should call ->filled and add the correct log  | 
          1128 | 
              # FIXME Must call Koha::Hold->cancel ? => No, should call ->filled and add the correct log  | 
        
  
    | 
      
            Lines 1250-1256
          sub ModReserveAffect {
      
      
        Link Here
      
     | 
  
        
          | 1250 | 
              });  | 
          1250 | 
              });  | 
        
        
          | 1251 | 
              $std->execute($hold->reserve_id);  | 
          1251 | 
              $std->execute($hold->reserve_id);  | 
        
        
          | 1252 | 
           | 
          1252 | 
           | 
        
          
            
              | 1253 | 
                  logaction( 'HOLDS', 'MODIFY', $hold->reserve_id, Dumper($hold->get_from_storage->unblessed) )  | 
              1253 | 
                  logaction( 'HOLDS', 'MODIFY', $hold->reserve_id, $hold->get_from_storage )  | 
            
        
          | 1254 | 
                  if C4::Context->preference('HoldsLog'); | 
          1254 | 
                  if C4::Context->preference('HoldsLog'); | 
        
        
          | 1255 | 
           | 
          1255 | 
           | 
        
        
          | 1256 | 
              return;  | 
          1256 | 
              return;  |