X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMouse%2FObject.pm;h=16846f5d5a7c57f203cde7a0a1e805f970df7859;hb=1b9e472d8c7e704eced9b2ea83194f83f0265018;hp=911954d4b6930341e2ac78c1f5effc86786b52c9;hpb=6d28c5cf89bfd4c00e675e95aff6c31b61aeb805;p=gitmo%2FMouse.git diff --git a/lib/Mouse/Object.pm b/lib/Mouse/Object.pm index 911954d..16846f5 100644 --- a/lib/Mouse/Object.pm +++ b/lib/Mouse/Object.pm @@ -71,7 +71,8 @@ sub dump { require 'Data/Dumper.pm'; # we don't want to create its namespace my $dd = Data::Dumper->new([$self]); - $dd->Maxdepth($maxdepth || 1); + $dd->Maxdepth(defined($maxdepth) ? $maxdepth : 2); + $dd->Indent(1); return $dd->Dump(); }