package Mouse::Role;
use Mouse::Util qw(not_supported); # enables strict and warnings
-use Carp ();
-use Scalar::Util ();
+use Carp qw(confess);
+use Scalar::Util qw(blessed);
use Mouse ();
use Mouse::Exporter;
],
);
+# XXX: for backward compatibility
+our @EXPORT = qw(
+ extends with
+ has
+ before after around
+ override super
+ augment inner
+
+ requires excludes
+
+ blessed confess
+);
sub before {
my $meta = Mouse::Meta::Role->initialize(scalar caller);