X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMouse.pm;h=877fc6ff7a9e0856155cc72593ff3131f26fd650;hb=4352306000f5015a5984891845a5016fa7c831a4;hp=0e1251641e81da125dfb885dd9135296f2a56d04;hpb=fea36fd29b45961b8687f1aee7fd2701c984fae4;p=gitmo%2FMouse.git

diff --git a/lib/Mouse.pm b/lib/Mouse.pm
index 0e12516..877fc6f 100644
--- a/lib/Mouse.pm
+++ b/lib/Mouse.pm
@@ -1,13 +1,12 @@
 package Mouse;
 use 5.006_002;
 
-use strict;
-use warnings;
+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);
 
@@ -17,7 +16,6 @@ use Mouse::Meta::Role;
 use Mouse::Meta::Attribute;
 use Mouse::Object;
 use Mouse::Util::TypeConstraints ();
-use Mouse::Exporter;
 
 Mouse::Exporter->setup_import_methods(
     as_is => [qw(
@@ -32,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 {