| Lines 36-41
          use Koha::Items;
      
      
        Link Here | 
        
          | 36 | use Koha::Library; | 36 | use Koha::Library; | 
        
          | 37 | use Koha::Patrons; | 37 | use Koha::Patrons; | 
        
          | 38 | use Koha::CirculationRules; | 38 | use Koha::CirculationRules; | 
            
              |  |  | 39 | use Koha::Statistics; | 
        
          | 39 |  | 40 |  | 
        
          | 40 | BEGIN { | 41 | BEGIN { | 
        
          | 41 |     require_ok('C4::Circulation'); | 42 |     require_ok('C4::Circulation'); | 
  
    | Lines 248-308
          subtest 'Show that AddRenewal respects OpacRenewalBranch and interface' => sub {
      
      
        Link Here | 
        
          | 248 |  | 249 |  | 
        
          | 249 |     $se->mock( 'interface', sub { return 'opac' } ); | 250 |     $se->mock( 'interface', sub { return 'opac' } ); | 
        
          | 250 |  | 251 |  | 
          
            
              | 251 |     t::lib::Mocks::mock_preference( 'OpacRenewalBranch', 'opacrenew' ); | 252 |     my $item_library = $builder->build_object( { class => 'Koha::Libraries' } ); | 
            
              | 252 |     my $item = $builder->build_sample_item({ itype => $itemtype}); | 253 |     my $patron       = $builder->build_object( { class => 'Koha::Patrons' } ); | 
            
              | 253 |     my $opac_renew_issue = C4::Circulation::AddIssue( $borrower_1, $item->barcode ); | 254 |     my $logged_in_user = $builder->build_object( { class => 'Koha::Patrons' } ); | 
            
              | 254 |     AddRenewal( | 255 |     t::lib::Mocks::mock_userenv( { patron => $logged_in_user } ); | 
            
              | 255 |         $borrower_id1, | 256 |  | 
            
              | 256 |         $item->itemnumber, | 257 |     my $OpacRenewalBranch = { | 
            
              | 257 |         "Stavromula", $datedue1, $daysago10 | 258 |         opacrenew        => "OPACRenew", | 
            
              | 258 |     ); | 259 |         checkoutbranch   => $logged_in_user->branchcode, | 
            
              | 259 |     my $stat = $schema->resultset('Statistic')->search({ itemnumber => $item->itemnumber, type => 'renew' })->next; | 260 |         patronhomebranch => $patron->branchcode, | 
            
              | 260 |     is( $stat->branch, "OPACRenew", "OpacRenewalBranch is respected for OpacRenewalBranch = OPACRenew" ); | 261 |         itemhomebranch   => $item_library->branchcode, | 
            
              | 261 |  | 262 |         none             => "", | 
            
              | 262 |     t::lib::Mocks::mock_preference( 'OpacRenewalBranch', 'checkoutbranch' ); | 263 |     }; | 
            
              | 263 |     my $item2 = $builder->build_sample_item({ itype => $itemtype}); | 264 |  | 
            
              | 264 |     $opac_renew_issue = C4::Circulation::AddIssue( $borrower_1, $item2->barcode ); | 265 |     while ( my ( $syspref, $expected_branchcode ) = each %$OpacRenewalBranch ) { | 
            
              | 265 |     AddRenewal( | 266 |  | 
            
              | 266 |         $borrower_id1, | 267 |         t::lib::Mocks::mock_preference( 'OpacRenewalBranch', $syspref ); | 
            
              | 267 |         $item2->itemnumber, | 268 |  | 
            
              | 268 |         "Stavromula", $datedue1, $daysago10 | 269 |         my $item = $builder->build_sample_item( | 
            
              | 269 |     ); | 270 |             { library => $item_library->branchcode, itype => $itemtype } ); | 
            
              | 270 |     $stat = $schema->resultset('Statistic')->search({ itemnumber => $item2->itemnumber, type => 'renew' })->next; | 271 |         my $opac_renew_issue = | 
            
              | 271 |     is( $stat->branch, $patron_1->branchcode, "OpacRenewalBranch is respected for OpacRenewalBranch = checkoutbranch" ); | 272 |           C4::Circulation::AddIssue( $patron->unblessed, $item->barcode ); | 
            
              | 272 |  | 273 |  | 
            
              | 273 |     t::lib::Mocks::mock_preference( 'OpacRenewalBranch', 'patronhomebranch' ); | 274 |         AddRenewal( $patron->borrowernumber, $item->itemnumber, | 
            
              | 274 |     my $item3 = $builder->build_sample_item({ itype => $itemtype}); | 275 |             "Stavromula", $datedue1, $daysago10 ); | 
            
              | 275 |     $opac_renew_issue = C4::Circulation::AddIssue( $borrower_1, $item3->barcode ); | 276 |  | 
            
              | 276 |     AddRenewal( | 277 |         my $stat = Koha::Statistics->search( | 
            
              | 277 |         $borrower_id1, | 278 |             { itemnumber => $item->itemnumber, type => 'renew' } )->next; | 
            
              | 278 |         $item3->itemnumber, | 279 |         is( $stat->branch, $expected_branchcode, | 
            
              | 279 |         "Stavromula", $datedue1, $daysago10 | 280 |             "->renewal_branchcode is respected for OpacRenewalBranch = $syspref" | 
            
              | 280 |     ); | 281 |         ); | 
            
              | 281 |     $stat = $schema->resultset('Statistic')->search({ itemnumber => $item3->itemnumber, type => 'renew' })->next; | 282 |     } | 
            
              | 282 |     my $patron = Koha::Patrons->find( $borrower_id1 ); |  |  | 
            
              | 283 |     is( $stat->branch, $patron->branchcode, "OpacRenewalBranch is respected for OpacRenewalBranch = patronhomebranch" ); | 
            
              | 284 |  | 
            
              | 285 |     t::lib::Mocks::mock_preference( 'OpacRenewalBranch', 'itemhomebranch' ); | 
            
              | 286 |     my $item4 = $builder->build_sample_item({ itype => $itemtype}); | 
            
              | 287 |     $opac_renew_issue = C4::Circulation::AddIssue( $borrower_1, $item4->barcode ); | 
            
              | 288 |     AddRenewal( | 
            
              | 289 |         $borrower_id1, | 
            
              | 290 |         $item4->itemnumber, | 
            
              | 291 |         "Stavromula", $datedue1, $daysago10 | 
            
              | 292 |     ); | 
            
              | 293 |     $stat = $schema->resultset('Statistic')->search({ itemnumber => $item4->itemnumber, type => 'renew' })->next; | 
            
              | 294 |     is( $stat->branch, $item4->homebranch, "OpacRenewalBranch is respected for OpacRenewalBranch = itemhomebranch" ); | 
            
              | 295 |  | 
            
              | 296 |     t::lib::Mocks::mock_preference( 'OpacRenewalBranch', 'none' ); | 
            
              | 297 |     my $item5 = $builder->build_sample_item({ itype => $itemtype}); | 
            
              | 298 |     $opac_renew_issue = C4::Circulation::AddIssue( $borrower_1, $item5->barcode ); | 
            
              | 299 |     AddRenewal( | 
            
              | 300 |         $borrower_id1, | 
            
              | 301 |         $item5->itemnumber, | 
            
              | 302 |         "Stavromula", $datedue1, $daysago10 | 
            
              | 303 |     ); | 
            
              | 304 |     $stat = $schema->resultset('Statistic')->search({ itemnumber => $item5->itemnumber, type => 'renew' })->next; | 
            
              | 305 |     is( $stat->branch, "", "OpacRenewalBranch is respected for OpacRenewalBranch none" ); | 
        
          | 306 | }; | 283 | }; | 
        
          | 307 |  | 284 |  | 
        
          | 308 | #Test GetBiblioIssues | 285 | #Test GetBiblioIssues | 
            
              | 309 | -  |  |  |