X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FDBIx%2FClass%2FCDBICompat%2FStringify.pm;h=e1c9a36a54d5c63365eab9584fa60b239cca04af;hb=5e0eea3522876a30453af24097507198bbbc9409;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..e1c9a36 100644 --- a/lib/DBIx/Class/CDBICompat/Stringify.pm +++ b/lib/DBIx/Class/CDBICompat/Stringify.pm @@ -1,14 +1,13 @@ -package DBIx::Class::CDBICompat::Stringify; +package # hide from PAUSE + DBIx::Class::CDBICompat::Stringify; use strict; use warnings; -use Scalar::Util; +use base 'DBIx::Class'; 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 {