Skip Menu |
 

This queue is for tickets about the TheSchwartz-Moosified CPAN distribution.

Report information
The Basics
Id: 70487
Status: open
Priority: 0/
Queue: TheSchwartz-Moosified

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

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



Subject: Error occured on MySQL 5.0.67 after updated from 0.04 to 0.06.
Download (untitled) / with headers
text/plain 517b
Hi Today, I upgrade TheSchwartz::Moosified from 0.04 to 0.06. Error occured. DBD::mysql::st execute failed: You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near 'WHERE NOT EXISTS ( SELECT 1 FROM exitstatus WHERE jobid = '398' ' at line 4 at /home/bokutin/perl5/perlbrew/perls/perl-5.14.0/lib/site_perl/5.14.0/TheSchwartz/Moosified/Job.pm line 143. I make a patch. Please look over this patch. Cheers Tomohiro Hosaka
Subject: TheSchwartz.diff.txt
2ndserver bokutin % diff -u -r TheSchwartz-Moosified-0.06.orig TheSchwartz-Moosified-0.06 diff -u -r TheSchwartz-Moosified-0.06.orig/lib/TheSchwartz/Moosified/Job.pm TheSchwartz-Moosified-0.06/lib/TheSchwartz/Moosified/Job.pm --- TheSchwartz-Moosified-0.06.orig/lib/TheSchwartz/Moosified/Job.pm 2011-07-15 06:59:57.000000000 +0900 +++ TheSchwartz-Moosified-0.06/lib/TheSchwartz/Moosified/Job.pm 2011-08-26 03:48:05.000000000 +0900 @@ -135,7 +135,7 @@ my $sth = $dbh->prepare(qq{ INSERT INTO $table_exitstatus (funcid, status, completion_time, delete_after, jobid) - SELECT ?, ?, ?, ?, ? + SELECT ?, ?, ?, ?, ? FROM $table_exitstatus WHERE NOT EXISTS ( SELECT 1 FROM $table_exitstatus WHERE jobid = ? )
Download (untitled) / with headers
text/plain 853b
On Thu Aug 25 15:00:00 2011, bokutin wrote: Show quoted text
> Hi > > Today, I upgrade TheSchwartz::Moosified from 0.04 to 0.06. > Error occured. > > DBD::mysql::st execute failed: You have an error in your SQL syntax; > check the manual that corresponds to your MySQL server version for the > right syntax to use near 'WHERE NOT EXISTS ( > SELECT 1 FROM exitstatus WHERE jobid = '398' > ' at line 4 at > /home/bokutin/perl5/perlbrew/perls/perl- > 5.14.0/lib/site_perl/5.14.0/TheSchwartz/Moosified/Job.pm > line 143. > > I make a patch. > > Please look over this patch. > > Cheers > Tomohiro Hosaka
Applying this patch causes many test failures. I'll look at this further, but I only have MySQL 5.5 here to test with at the moment. If you can further investigate and provide a patch which doesn't cause test failures I'll put it in. Thank you.


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.