refactor log router API to use named args and clearer names for those args
[p5sagit/Log-Contextual.git] / t / lib / TestRouter.pm
CommitLineData
a5454e75 1package TestRouter;
2
3use Moo;
4use Log::Contextual::SimpleLogger;
5
6with 'Log::Contextual::Role::Router';
7
8has captured => (is => 'ro', default => sub { {} });
9
10sub before_import {
11 my ($self, %export_info) = @_;
12 $self->captured->{before_import} = \%export_info;
13}
14
15sub after_import {
16 my ($self, %export_info) = @_;
17 $self->captured->{after_import} = \%export_info;
18}
19
20sub handle_log_request {
21 my ($self, %message_info) = @_;
22 $self->captured->{message} = \%message_info;
23}
24
251;