Skip Menu |
 

This queue is for tickets about the DBIx-Simple CPAN distribution.

Report information
The Basics
Id: 83214
Status: new
Priority: 0/
Queue: DBIx-Simple

People
Owner: Nobody in particular
Requestors: bokutin [...] cpan.org
Cc:
AdminCc:

Bug Information
Severity: Unimportant
Broken in: 1.35
Fixed in: (no value)



Subject: POD fix
Download (untitled) / with headers
text/plain 956b
diff -u DBIx-Simple-1.35/lib/DBIx/Simple.pm.orig DBIx-Simple-1.35/lib/DBIx/Simple.pm --- DBIx-Simple-1.35/lib/DBIx/Simple.pm.orig 2011-01-05 07:53:54.000000000 +0900 +++ DBIx-Simple-1.35/lib/DBIx/Simple.pm 2013-02-08 23:01:25.000000000 +0900 @@ -1038,7 +1038,7 @@ package DBIx::Simple::Result::ObjectExample; sub new { my ($class, %args) = @_; - return bless $class, \%args; + return bless \%args, $class; } sub foo { ... } @@ -1065,8 +1065,8 @@ package DBIx::Simple::Result::ObjectExample; sub new_from_dbix_simple { my ($class, $result, @args) = @_; - return map { bless $class, $_ } $result->hashes if wantarray; - return bless $class, $result->hash; + return map { bless $_, $class } $result->hashes if wantarray; + return bless $result->hash, $class; } sub foo { ... }


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.