File Coverage

blib/lib/EventStore/Tiny/Snapshot.pm

Criterion	Covered	Total	%
statement	15	15	100.0
branch			n/a
condition			n/a
subroutine	4	4	100.0
pod	0	1	0.0
total	19	20	95.0

package EventStore::Tiny::Snapshot;

use strict;
use warnings;

use Class::Tiny {
    state       => sub {die "state is required.\n"},
    timestamp   => sub {die "timestamp is required.\n"},
};

sub BUILD {
    my $self = shift;

    # Check non-lazy
    $self->state;
    $self->timestamp;

    # Return nothing (will be ignored anyway)
    return;
}

1;

=pod

=encoding utf-8

=head1 NAME

EventStore::Tiny::Snapshot

=head1 REFERENCE

EventStore::Tiny::Snapshot implements the following attributes and methods.

=head2 state

    my $state_hr = $snapshot->state;

Returns the hashref representing the state of this snapshot.

=head2 timestamp

    my $timestamp = $snapshot->timestamp;

Returns a timestamp representing the time this snapshot was created.

=head1 SEE ALSO

L

=head1 COPYRIGHT AND LICENSE

Copyright (c) 2018 Mirko Westermeier (mail: [e-mail])

Released under the MIT License (see LICENSE.txt for details).

=cut