X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FClass%2FMOP%2FMethod%2FGenerated.pm;h=6c6b4ad43ce248fd602753382906c8f036cbead4;hb=53edec17bae8aa34a398b0bd50dcd7e78e03b733;hp=1481e96aa71ccf13310e507d41fb6aace5bdf60b;hpb=19042e4de51060275cd940cf997a6791afb0dfec;p=gitmo%2FClass-MOP.git diff --git a/lib/Class/MOP/Method/Generated.pm b/lib/Class/MOP/Method/Generated.pm index 1481e96..6c6b4ad 100644 --- a/lib/Class/MOP/Method/Generated.pm +++ b/lib/Class/MOP/Method/Generated.pm @@ -6,7 +6,7 @@ use warnings; use Carp 'confess'; -our $VERSION = '0.92'; +our $VERSION = '0.95'; $VERSION = eval $VERSION; our $AUTHORITY = 'cpan:STEVAN'; @@ -50,7 +50,7 @@ sub _eval_closure { } keys %$__captures ), $_[2]; - print STDERR $_[0]->name, ' ', $source, "\n" if _PRINT_SOURCE; + print STDERR "\n", $_[0]->name, ":\n", $source, "\n" if _PRINT_SOURCE; $code = eval $source; $@; };