| 
      
            Lines 1301-1312
          sub AddIssue {
      
      
        Link Here
      
     | 
  
        
          | 1301 | 
                  my $biblio = GetBiblioFromItemNumber( $item->{itemnumber} ); | 
          1301 | 
                  my $biblio = GetBiblioFromItemNumber( $item->{itemnumber} ); | 
        
        
          | 1302 | 
           | 
          1302 | 
           | 
        
        
          | 1303 | 
                  # check if we just renew the issue.  | 
          1303 | 
                  # check if we just renew the issue.  | 
        
          
            
              | 1304 | 
                      if ( $actualissue->{borrowernumber} eq $borrower->{'borrowernumber'} | 
              1304 | 
                      if ( $actualissue->{borrowernumber} eq $borrower->{borrowernumber} | 
            
            
              | 1305 | 
                              and not $switch_onsite_checkout ) { | 
              1305 | 
                          and not $switch_onsite_checkout )  | 
            
            
               | 
               | 
              1306 | 
                      { | 
            
        
          | 1306 | 
                      $datedue = AddRenewal(  | 
          1307 | 
                      $datedue = AddRenewal(  | 
        
          
            
              | 1307 | 
                              $borrower->{'borrowernumber'}, | 
              1308 | 
                              $borrower->{borrowernumber}, | 
            
            
              | 1308 | 
                              $item->{'itemnumber'}, | 
              1309 | 
                              $item->{itemnumber}, | 
            
            
              | 1309 | 
                              $branch,  | 
              1310 | 
                              C4::Context->userenv ? C4::Context->userenv->{branch} : $branch, | 
            
        
          | 1310 | 
                          $datedue,  | 
          1311 | 
                          $datedue,  | 
        
        
          | 1311 | 
                          $issuedate,    # here interpreted as the renewal date  | 
          1312 | 
                          $issuedate,    # here interpreted as the renewal date  | 
        
        
          | 1312 | 
                      );  | 
          1313 | 
                      );  | 
        
            
              | 1313 | 
              -   | 
               | 
               |