X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=gitmo%2FMouse.git;a=blobdiff_plain;f=lib%2FMouse%2FUtil.pm;h=b7ab693e809fd5b987eb029fd0f7cae3a85a6a0e;hp=3ffa37550e5b66e2183a239938973080b5b5e00b;hb=0cf6f1be4b31b31a9e0f9850e730123759ce35eb;hpb=5af36247683101e3c457450489486d41f0bd7101

diff --git a/lib/Mouse/Util.pm b/lib/Mouse/Util.pm
index 3ffa375..b7ab693 100644
--- a/lib/Mouse/Util.pm
+++ b/lib/Mouse/Util.pm
@@ -344,14 +344,15 @@ sub dump :method {
 
     require 'Data/Dumper.pm'; # we don't want to create its namespace
     my $dd = Data::Dumper->new([$self]);
-    $dd->Maxdepth(defined($maxdepth) ? $maxdepth : 2);
+    $dd->Maxdepth(defined($maxdepth) ? $maxdepth : 3);
     $dd->Indent(1);
     return $dd->Dump();
 }
 
 # general does() method
-sub does :method;
-*does = \&does_role; # alias
+sub does :method {
+    goto &does_role;
+}
 
 1;
 __END__