[ Mini Kiebo ]

Server: Windows NT AKFAR_SERVER 10.0 build 26200 (Windows 10) AMD64 Path: D:/xampp/perl/vendor/lib/Moose/Exception/ [ Home ]

File: TriggerMustBeACodeRef.pm

package Moose::Exception::TriggerMustBeACodeRef;
our $VERSION = '2.2014';

use Moose;
extends 'Moose::Exception';
with 'Moose::Exception::Role::InvalidAttributeOptions';

sub _build_message {
    my $self = shift;
    "Trigger must be a CODE ref on attribute (".$self->attribute_name.")";
}

__PACKAGE__->meta->make_immutable;
1;