File Coverage

blib/lib/Iterator/Flex/Role/Rewind/Method.pm

Criterion	Covered	Total	%
statement	14	14	100.0
branch			n/a
condition			n/a
subroutine	5	5	100.0
pod			n/a
total	19	19	100.0

package Iterator::Flex::Role::Rewind::Method;

# ABSTRACT: Implement rewind as a method

use v5.28;
use strict;
use warnings;

our $VERSION = '0.33';

use Role::Tiny;

use namespace::clean;











around rewind => sub {
    my $orig = shift;
    my $self = shift;
    $self->_apply_method_to_depends( 'rewind' );

    $self->$orig;
    $self->_clear_state;

    return;
};

*__rewind__ = \&rewind;


requires 'rewind';
requires '_clear_state';

1;

#
# This file is part of Iterator-Flex
#
# This software is Copyright (c) 2018 by Smithsonian Astrophysical Observatory.
#
# This is free software, licensed under:
#
#   The GNU General Public License, Version 3, June 2007
#

__END__