[Dbix-class] strange SQL generated

[Alan Humphrey]

Looks like this line in ResultSet triggers the bug:

    $row = $self->search(\@unique_hashes, { rows => 1 })->first;

If the { rows => 1 } attribute is removed then there's no problem.

That attribute certainly *looks* superfluous...

- Alan

-----Original Message-----
From: dbix-class-bounces at lists.rawmode.org
[mailto:dbix-class-bounces at lists.rawmode.org] On Behalf Of Matt S Trout
Sent: Wednesday, February 15, 2006 9:47 AM
To: dbix-class at lists.rawmode.org
Subject: Re: [Dbix-class] strange SQL generated

On Wed, Feb 15, 2006 at 09:18:23AM -0800, Alan Humphrey wrote:
> Working against a MSSQL backend this code generates the following SQL:
> 
> my $cols;
> $$cols{id} = 65;
> $$cols{url} = 'test';
> 
> BirdWeb::Admin::Model::Production->resultset('Urls')->update_or_create(
> $cols );
> 
> 
> SQL:
> 
> SELECT me.id, me.url, me.last_checked, me.last_status FROM urls X me WHERE
(
> ( id = ? ) ) AND
> (
>     SELECT COUNT(*) FROM urls WHERE me > X.me
> )
> < 1
> ORDER BY me DESC
> 
> 
> The same code running against a MySQL backend works fine.

Smells like an SQL::Abstract::Limit bug.

-- 
     Matt S Trout       Offering custom development, consultancy and support
  Technical Director    contracts for Catalyst, DBIx::Class and BAST.
Contact
Shadowcat Systems Ltd.  mst (at) shadowcatsystems.co.uk for more information

 + Help us build a better perl ORM:
http://dbix-class.shadowcatsystems.co.uk/ +

_______________________________________________
List: http://lists.rawmode.org/cgi-bin/mailman/listinfo/dbix-class
Wiki: http://dbix-class.shadowcatsystems.co.uk/
IRC: irc.perl.org#dbix-class
SVN: http://dev.catalyst.perl.org/repos/bast/trunk/DBIx-Class/