Skip Menu |
 

This queue is for tickets about the Class-DBI-Sweet CPAN distribution.

Report information
The Basics
Id: 16513
Status: resolved
Worked: 15 min
Priority: 0/
Queue: Class-DBI-Sweet

People
Owner: PHRED [...] cpan.org
Requestors: davetest [...] s4c.co.uk
Cc:
AdminCc:

Bug Information
Severity: Normal
Broken in: 0.08
Fixed in: (no value)



Subject: "Bizarre copy of HASH in leave"
Download (untitled) / with headers
text/plain 916b
Hi, Thanks for writing a great module. I've discovered a small bug. I haven't noticed it before, but we've moved to Apache2 + mod_perl 2 and code I've written before doesn't work now! The error message in the apache log is: [Thu Dec 15 15:22:04 2005] [error] Error executing run mode 'index': Bizarre copy of HASH in leave at /opt/csw/share/perl/site_perl/Class/DBI/Sweet.pm line 309.\n at /export/sites/cgi-bin/dudley.pl line 12\n Google revealed this link which explained why this message was happening: http://www.dbforums.com/showthread.php?mode=hybrid&t=1047580 I've removed the extra % (see below) and it seems to work. ##### Sweet.pm if ( $part eq 'sql' ) { ####push @sql_parts, join ' ', @{%$sql_parts}{qw/ where order_by limit/}; push @sql_parts, join ' ', @{$sql_parts}{qw/ where order_by limit/}; next; } ###### snip Sorry I can't be more insightful. Best wishes, David Morgan
From: fenLisesi [...] gmail.com
Download (untitled) / with headers
text/plain 1.1k
I had problems with this issue today and had to edit Sweet.pm 0.08 as suggested in the discussion below. I am surprised that this hasn't been fixed yet. --Ali ISIK On Thu Dec 15 10:34:16 2005, guest wrote: Show quoted text
> Hi, > Thanks for writing a great module. > I've discovered a small bug. I haven't noticed it before, but we've > moved to Apache2 + mod_perl 2 and code I've written before doesn't > work now! > > The error message in the apache log is: > > [Thu Dec 15 15:22:04 2005] [error] Error executing run mode 'index': > Bizarre copy of HASH in leave at > /opt/csw/share/perl/site_perl/Class/DBI/Sweet.pm line 309.\n at > /export/sites/cgi-bin/dudley.pl line 12\n > > Google revealed this link which explained why this message was > happening: > > http://www.dbforums.com/showthread.php?mode=hybrid&t=1047580 > > I've removed the extra % (see below) and it seems to work. > > > ##### Sweet.pm > if ( $part eq 'sql' ) { > ####push @sql_parts, join ' ', @{%$sql_parts}{qw/ where order_by > limit/}; > push @sql_parts, join ' ', @{$sql_parts}{qw/ where order_by > limit/}; > next; > } > ###### snip > > Sorry I can't be more insightful. > > Best wishes, > David Morgan >
From: perl-cpan [...] bereft.net
Download (untitled) / with headers
text/plain 209b
See also perlbug #3420: http://rt.perl.org/rt3/Public/Bug/Display.html?id=3420 The fix is probably just removing the % in line 309: push @sql_parts, join ' ', @{%$sql_parts}{qw/ where order_by limit/};
Download (untitled) / with headers
text/plain 187b
This hasn't been fixed yet because Sweet is unmaintained in favour of the far more powerful and effective DBIx::Class. If anybody wants to take over this obsolete module, drop me a line.
Download (untitled) / with headers
text/plain 104b
This patch has been applied and the bug will be resolved as of 0.09, which should release in a few days.


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.