use Mouse::Exporter; # enables strict and warnings
-our $VERSION = '0.40';
+our $VERSION = '0.40_05';
use Carp qw(confess);
use Scalar::Util qw(blessed);
use Mouse::Meta::Module;
use Mouse::Meta::Class;
+use Mouse::Meta::Role;
use Mouse::Meta::Attribute;
use Mouse::Object;
use Mouse::Util::TypeConstraints ();
});
$meta->superclasses($base_class)
- unless $meta->superclasses;
+ unless $class->isa($base_class);
# make a class type for each Mouse class
Mouse::Util::TypeConstraints::class_type($class)
=head1 VERSION
-This document describes Mouse version 0.40
+This document describes Mouse version 0.40_05
=head1 SYNOPSIS
=head1 AUTHORS
-Shawn M Moore, E<lt>sartak at gmail.comE<gt>
+Shawn M Moore E<lt>sartak at gmail.comE<gt>
-Yuval Kogman, E<lt>nothingmuch at woobling.orgE<gt>
+Yuval Kogman E<lt>nothingmuch at woobling.orgE<gt>
tokuhirom