| Lines 25-31
          use C4::Members::AttributeTypes;
      
      
        Link Here | 
        
          | 25 | use Koha::Database; | 25 | use Koha::Database; | 
        
          | 26 | use t::lib::TestBuilder; | 26 | use t::lib::TestBuilder; | 
        
          | 27 |  | 27 |  | 
          
            
              | 28 | use Test::More tests => 55; | 28 | use Test::More tests => 48; | 
        
          | 29 |  | 29 |  | 
        
          | 30 | use_ok('C4::Members::Attributes'); | 30 | use_ok('C4::Members::Attributes'); | 
        
          | 31 |  | 31 |  | 
  
    | Lines 58-81
          my $borrowernumber = $patron->{borrowernumber};
      
      
        Link Here | 
        
          | 58 |  | 58 |  | 
        
          | 59 | my $attribute_type1 = C4::Members::AttributeTypes->new('my code1', 'my description1'); | 59 | my $attribute_type1 = C4::Members::AttributeTypes->new('my code1', 'my description1'); | 
        
          | 60 | $attribute_type1->unique_id(1); | 60 | $attribute_type1->unique_id(1); | 
            
              | 61 | my $attribute_types = C4::Members::Attributes::GetAttributes(); |  |  | 
            
              | 62 | is( @$attribute_types, 0, 'GetAttributes returns the correct number of attribute types' ); | 
        
          | 63 | $attribute_type1->store(); | 61 | $attribute_type1->store(); | 
            
              | 64 | $attribute_types = C4::Members::Attributes::GetAttributes(); |  |  | 
            
              | 65 | is( @$attribute_types, 1, 'GetAttributes returns the correct number of attribute types' ); | 
            
              | 66 | is( $attribute_types->[0], $attribute_type1->code(), 'GetAttributes returns the correct value for code' ); | 
            
              | 67 | $attribute_types = C4::Members::Attributes::GetAttributes(1); | 
            
              | 68 | is( @$attribute_types, 0, 'GetAttributes returns the correct number of attribute types with the filter opac_only' ); | 
        
          | 69 |  | 62 |  | 
        
          | 70 | my $attribute_type2 = C4::Members::AttributeTypes->new('my code2', 'my description2'); | 63 | my $attribute_type2 = C4::Members::AttributeTypes->new('my code2', 'my description2'); | 
        
          | 71 | $attribute_type2->opac_display(1); | 64 | $attribute_type2->opac_display(1); | 
        
          | 72 | $attribute_type2->staff_searchable(1); | 65 | $attribute_type2->staff_searchable(1); | 
        
          | 73 | $attribute_type2->store(); | 66 | $attribute_type2->store(); | 
            
              | 74 | $attribute_types = C4::Members::Attributes::GetAttributes(); |  |  | 
            
              | 75 | is( @$attribute_types, 2, 'GetAttributes returns the correct number of attribute types' ); | 
            
              | 76 | is( $attribute_types->[1], $attribute_type2->code(), 'GetAttributes returns the correct value for code' ); | 
            
              | 77 | $attribute_types = C4::Members::Attributes::GetAttributes(1); | 
            
              | 78 | is( @$attribute_types, 1, 'GetAttributes returns the correct number of attribute types with the filter opac_only' ); | 
        
          | 79 |  | 67 |  | 
        
          | 80 | my $new_library = $builder->build( { source => 'Branch' } ); | 68 | my $new_library = $builder->build( { source => 'Branch' } ); | 
        
          | 81 | my $attribute_type_limited = C4::Members::AttributeTypes->new('my code3', 'my description3'); | 69 | my $attribute_type_limited = C4::Members::AttributeTypes->new('my code3', 'my description3'); | 
            
              | 82 | -  |  |  |