NAME

MooseX::Role::Callback

SYNOPSIS

package Foo;

use Moose::Role;
use MooseX::Role::Callback;

included(sub {
    my ($meta, $user) = @_;
    print "Foo applied to " . $user->name . "\n";
});

package Bar;

use Moose;
with 'Foo'; # Prints "Foo applied to Bar"

DESCRIPTION

Execute a callback function when a role is applied.

FUNCTIONS

included

Registers a function to be called when the role is applied. Takes a single coderef as an argument.

The function will be passed the role's metaclass and the $thing's metaclass, where $thing can be either class or instance.

Call multiple times to register multiple callbacks.

GITHUB

Find this project on github:

https://github.com/pboyd/MooseX-Role-Callback

AUTHOR

Paul Boyd <pboyd@cpan.org>

COPYRIGHT AND LICENSE

This software is copyright (c) 2012 by Paul Boyd.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.