--- trunk/lib/Frey.pm 2008/12/01 12:49:52 657 +++ trunk/lib/Frey.pm 2008/12/02 22:06:48 692 @@ -4,7 +4,7 @@ our $VERSION = "0.23"; use Data::Dump qw//; -sub dump { Data::Dump::dump ( @_ ) } +sub dump { ref(shift) . ' ' . Data::Dump::dump ( @_ ) } has 'debug' => ( is => 'rw',