X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=lib%2FMouse%2FRole.pm;h=f5da880057290a877f1c35b22b10b6a41e6d205d;hp=7530423fa2af0a890e11fd3065fb005995c78484;hb=8da998d9d52f4f1bed58f3b196cccbd725959c56;hpb=f9e68395ec48e239c2a2c77d15399aac9497b937 diff --git a/lib/Mouse/Role.pm b/lib/Mouse/Role.pm index 7530423..f5da880 100644 --- a/lib/Mouse/Role.pm +++ b/lib/Mouse/Role.pm @@ -4,11 +4,17 @@ use strict; use warnings; use Sub::Exporter; +use Carp 'confess'; do { my $CALLER; my %exports = ( + extends => sub { + return sub { + confess "Mouse::Role does not currently support 'extends'"; + } + }, ); my $exporter = Sub::Exporter::build_exporter({