X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=lib%2FMouse.pm;h=877fc6ff7a9e0856155cc72593ff3131f26fd650;hp=81bce557e95a63f461a0b77bdb128fb665d301bc;hb=4352306000f5015a5984891845a5016fa7c831a4;hpb=cf86307ef04cb569c4f8ceaf7e7b6526de1ba01e diff --git a/lib/Mouse.pm b/lib/Mouse.pm index 81bce55..877fc6f 100644 --- a/lib/Mouse.pm +++ b/lib/Mouse.pm @@ -6,7 +6,7 @@ use Mouse::Exporter; # enables strict and warnings our $VERSION = '0.37_02'; use Carp qw(confess); -use Scalar::Util (); +use Scalar::Util qw(blessed); use Mouse::Util qw(load_class is_class_loaded get_code_package not_supported); @@ -30,6 +30,16 @@ Mouse::Exporter->setup_import_methods( ], ); +# XXX: for backward compatibility +our @EXPORT = qw( + extends with + has + before after around + override super + augment inner + blessed confess +); + sub extends { Mouse::Meta::Class->initialize(scalar caller)->superclasses(@_) } sub has {