The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
package EWS::Calendar::Role::Reader;
BEGIN {
  $EWS::Calendar::Role::Reader::VERSION = '1.141040';
}
use Moose::Role;

with 'EWS::Calendar::Role::RetrieveWithinWindow';
use EWS::Calendar::Window;

sub retrieve {
    my ($self, $opts) = @_;
    return $self->retrieve_within_window({
        window => EWS::Calendar::Window->new($opts),
        %$opts,
    });
}

no Moose::Role;
1;