--- lib/A3C/SQL.pm 2008/08/31 13:51:58 232 +++ lib/A3C/SQL.pm 2008/09/01 18:44:33 233 @@ -71,6 +71,7 @@ my $self = shift; my $row = $self->sth->fetchrow_hashref; return unless defined $row; +# $self->log->debug( dump( $row ) ); return A3C::SQL::row->new( $row, $self->encoding ); } @@ -120,7 +121,7 @@ sub AUTOLOAD { my $self = shift; my $type = ref($self) or die "$self is not an object"; - my $name = $AUTOLOAD; + my $name = lc($AUTOLOAD); # DBI lowercase columns so we do same for accessors $name =~ s/.*://; my $v = $self->{$name}; Jifty->log->error("SQL: $name doesn't exist") unless defined $v;