blib/lib/WebService/Mattermost/V4/API/Object/Role/Roles.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
statement | 6 | 8 | 75.0 |
branch | n/a | ||
condition | n/a | ||
subroutine | 2 | 3 | 66.6 |
pod | n/a | ||
total | 8 | 11 | 72.7 |
line | stmt | bran | cond | sub | pod | time | code |
---|---|---|---|---|---|---|---|
1 | package WebService::Mattermost::V4::API::Object::Role::Roles; 2: 3: # ABSTRACT: Adds a "roles" field to an object. 4: 5: use Moo::Role; 6: use Types::Standard qw(Maybe Str); 7: 8: ################################################################################ 9: 10: has roles => (is => 'ro', isa => Maybe[Str], lazy => 1, builder => 1); 11: 12: ################################################################################ 13: 14: sub _build_roles { 15: my $self = shift; 16: 17: return $self->raw_data->{roles}; 18: } 19: 20: ################################################################################ 21: 22: 1; 23: 24: __END__ 25: 26: =pod 27: 28: =encoding UTF-8 29: 30: =head1 NAME 31: 32: WebService::Mattermost::V4::API::Object::Role::Roles - Adds a "roles" field to an object. 33: 34: =head1 VERSION 35: 36: version 0.28 37: 38: =head1 DESCRIPTION 39: 40: Attach an Roles to a v4::Object object. 41: 42: =head2 ATTRIBUTES 43: 44: =over 4 45: 46: =item C<roles> 47: 48: String. 49: 50: =back 51: 52: =head1 AUTHOR 53: 54: Mike Jones <mike@netsplit.org.uk> 55: 56: =head1 COPYRIGHT AND LICENSE 57: 58: This software is Copyright (c) 2020 by Mike Jones. 59: 60: This is free software, licensed under: 61: 62: The MIT (X11) License 63: 64: =cut 65: |