use warnings;
use Sub::Exporter;
+use Carp 'confess';
do {
my $CALLER;
my %exports = (
+ extends => sub {
+ return sub {
+ confess "Role does not currently support 'extends'";
+ }
+ },
+ before => sub {
+ return sub { }
+ },
+ after => sub {
+ return sub { }
+ },
+ around => sub {
+ return sub { }
+ },
+ has => sub {
+ return sub { }
+ },
+ with => sub {
+ return sub { }
+ },
+ requires => sub {
+ return sub { }
+ },
+ excludes => sub {
+ return sub { }
+ },
);
my $exporter = Sub::Exporter::build_exporter({