| Lines 17-23
          
      
      
        Link Here | 
        
          | 17 |  | 17 |  | 
        
          | 18 | use Modern::Perl; | 18 | use Modern::Perl; | 
        
          | 19 |  | 19 |  | 
          
            
              | 20 | use Test::More tests => 32; | 20 | use Test::More tests => 33; | 
        
          | 21 | use Test::Exception; | 21 | use Test::Exception; | 
        
          | 22 | use Test::Warn; | 22 | use Test::Warn; | 
        
          | 23 |  | 23 |  | 
  
    | Lines 148-153
          subtest 'items() tests' => sub {
      
      
        Link Here | 
        
          | 148 |  | 148 |  | 
        
          | 149 | }; | 149 | }; | 
        
          | 150 |  | 150 |  | 
            
              |  |  | 151 | subtest 'bookable_items() tests' => sub { | 
            
              | 152 |     plan tests => 3; | 
            
              | 153 |  | 
            
              | 154 |     $schema->storage->txn_begin; | 
            
              | 155 |  | 
            
              | 156 |     my $biblio = $builder->build_sample_biblio(); | 
            
              | 157 |  | 
            
              | 158 |     # bookable items | 
            
              | 159 |     my $bookable_item1 = $builder->build_sample_item( { biblionumber => $biblio->biblionumber, bookable => 1 } ); | 
            
              | 160 |  | 
            
              | 161 |     # not bookable items | 
            
              | 162 |     my $non_bookable_item1 = $builder->build_sample_item( { biblionumber => $biblio->biblionumber, bookable => 0 } ); | 
            
              | 163 |     my $non_bookable_item2 = $builder->build_sample_item( { biblionumber => $biblio->biblionumber, bookable => 0 } ); | 
            
              | 164 |  | 
            
              | 165 |     is( ref( $biblio->bookable_items ), 'Koha::Items', "bookable_items returns a Koha::Items resultset" ); | 
            
              | 166 |     is( $biblio->bookable_items->count, 1,             "bookable_items returns the correct number of items" ); | 
            
              | 167 |     is( | 
            
              | 168 |         $biblio->bookable_items->next->itemnumber, $bookable_item1->itemnumber, | 
            
              | 169 |         "bookable_items returned the correct item" | 
            
              | 170 |     ); | 
            
              | 171 |  | 
            
              | 172 |     $schema->storage->txn_rollback; | 
            
              | 173 | }; | 
            
              | 174 |  | 
        
          | 151 | subtest 'get_coins and get_openurl' => sub { | 175 | subtest 'get_coins and get_openurl' => sub { | 
        
          | 152 |  | 176 |  | 
        
          | 153 |     plan tests => 4; | 177 |     plan tests => 4; | 
            
              | 154 | -  |  |  |