[Bast-commits] r3153 - trunk/DBIx-Class/lib/DBIx/Class/Storage
blblack at dev.catalyst.perl.org
blblack at dev.catalyst.perl.org
Thu Mar 29 15:13:17 GMT 2007
Author: blblack
Date: 2007-03-29 15:13:17 +0100 (Thu, 29 Mar 2007)
New Revision: 3153
Modified:
trunk/DBIx-Class/lib/DBIx/Class/Storage/DBI.pm
Log:
backport Ash's quoting fix from Loader to columns_info_for
Modified: trunk/DBIx-Class/lib/DBIx/Class/Storage/DBI.pm
===================================================================
--- trunk/DBIx-Class/lib/DBIx/Class/Storage/DBI.pm 2007-03-29 14:11:00 UTC (rev 3152)
+++ trunk/DBIx-Class/lib/DBIx/Class/Storage/DBI.pm 2007-03-29 14:13:17 UTC (rev 3153)
@@ -926,7 +926,7 @@
}
my %result;
- my $sth = $dbh->prepare("SELECT * FROM $table WHERE 1=0");
+ my $sth = $dbh->prepare($self->sql_maker->select($table, undef, \'1 = 0'));
$sth->execute;
my @columns = @{$sth->{NAME_lc}};
for my $i ( 0 .. $#columns ){
More information about the Bast-commits
mailing list