X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FCDBICompat%2FStringify.pm;h=4d13171e82299ef1b2b86bf86179c4f99facc4e6;hb=2f3105ce2a484d2c6cb4f514c31b9dea05e9a75c;hp=1a05b316d4fbd9c2f323f4cac26fe5c09fe92891;hpb=2441e56f45b903491252be04eda67613d20f73e8;p=dbsrgits%2FDBIx-Class.git diff --git a/lib/DBIx/Class/CDBICompat/Stringify.pm b/lib/DBIx/Class/CDBICompat/Stringify.pm index 1a05b31..4d13171 100644 --- a/lib/DBIx/Class/CDBICompat/Stringify.pm +++ b/lib/DBIx/Class/CDBICompat/Stringify.pm @@ -1,4 +1,5 @@ -package DBIx::Class::CDBICompat::Stringify; +package # hide from PAUSE + DBIx::Class::CDBICompat::Stringify; use strict; use warnings; @@ -6,9 +7,7 @@ use warnings; use Scalar::Util; use overload - '""' => sub { - return Scalar::Util::refaddr($_[0]) if (caller)[0] eq 'NEXT'; - return shift->stringify_self; }, + '""' => sub { return shift->stringify_self; }, fallback => 1; sub stringify_self {