1package Moose::Exception::NoCasesMatched;
2our $VERSION = '2.2201';
3
4use Moose;
5extends 'Moose::Exception';
6
7has 'to_match' => (
8    is       => 'ro',
9    isa      => 'Any',
10    required => 1
11);
12
13has 'cases_to_be_matched' => (
14    is       => 'ro',
15    isa      => 'ArrayRef',
16    required => 1
17);
18
19sub _build_message {
20    my $self = shift;
21    my $to_match = $self->to_match;
22
23    return "No cases matched for $to_match";
24}
25
26__PACKAGE__->meta->make_immutable;
271;
28