Subject: | against mysql, connecting with (create=>1) doesn't ->deploy entries/gin_index on existing table |
Date: | Sun, 18 Jul 2010 23:25:32 +0100 |
To: | bugs-kiokudb <bugs-kiokudb [...] rt.cpan.org> |
From: | Hakim Cassimally <hakim.cassimally [...] gmail.com> |
As mentioned on IRC - though (create=>1) works against a DB I just
created, it doesn't against the one for $app.
#!/usr/bin/perl
use strict; use warnings;
use Test::More;
use feature 'say';
# Deps: KiokuDB, SQL::Translator (for deploy)
use KiokuDB;
package Foo;
use KiokuDB::Class;
has foo => (
is => 'ro',
isa => 'Str',
);
{
my $create = 1;
my $kioku = KiokuDB->connect(
"dbi:mysql:dbname=vfkm_dev",
user => 'root',
password => 'password',
create => $create);
# $kioku->backend->deploy({ producer_args => { mysql_version => 4
} }) if $create;
my $scope = $kioku->new_scope;
my $foo = Foo->new( foo => 'wibble' );
$kioku->store( foo => $foo );
}
#######
$ perl t/dbi.t
DBIx::Class::Storage::DBI::__ANON__(): DBI Exception: DBD::mysql::st
execute_array failed: Table 'vfkm_dev.entries' doesn't exist [err was
1146 now 2000000000]
executing 1 generated 1 errors [for Statement "INSERT INTO entries
(id, class, root, tied, data) VALUES (?, ?, ?, ?, ?)"] at
/home/hakim/perl5/lib/perl5/KiokuDB/Backend/DBI.pm line 486
######
Show quoted text
mysql> use vfkm_dev
Database changed
Show quoted textmysql> show tables like 'gin_index';
Empty set (0.00 sec)
Show quoted textmysql> show tables like 'entries';
Empty set (0.00 sec)