use strict;
use warnings;
use Test::More 0.88;
use if $ENV{AUTHOR_TESTING}, 'Test::Warnings';
do {
package Fib;
sub onacci { (1, 1, 2) }
};
is_deeply([Fib->onacci], [1, 1, 2]);
do {
package Fib;
use Class::Method::Modifiers;
before onacci => sub {};
};
is_deeply([Fib->onacci], [1, 1, 2]);
do {
package Fib;
use Class::Method::Modifiers;
after onacci => sub {};
};
is_deeply([Fib->onacci], [1, 1, 2]);
done_testing;