[Dbix-class] HTML::Widget::DBIC failes to test

[Goetz Bock]

Hi,

I've tried to install InstantCRUD today, but had to force
HTML::Widget::DBIC and DBIx::Class::DigestColumns as they fail to test.

For DBIx::Class::DigestColumns see my last post.

HTML::Widget::DBIC comes with a prepopulated database and my
DBD::SQLite 1.13 (linked with libsqlite3-3.3.5-0.1bpo1) failes in 
100_create:

bg at pldev:~/.cpan/build/HTML-Widget-DBIC-0.01$ make test
PERL_DL_NONLAZY=1 /usr/bin/perl "-MExtUtils::Command::MM" "-e" "test_harness(0, 'blib/lib', 'blib/arch')" t/*.t
t/001_load......ok                                                           
t/100_create....DBD::SQLite::db do failed: table role already exists(1) at dbdimp.c line 271 at /home/bg/site/perl/lib/perl5/DBIx/Class/Storage/DBI.pm line 1109.
SQL was:
 CREATE TABLE role (
  id INTEGER PRIMARY KEY NOT NULL,
  role VARCHAR(255) NOT NULL
) at /home/bg/site/perl/lib/perl5/DBIx/Class/Storage/DBI.pm line 1109.
DBD::SQLite::db do failed: table dvd already exists(1) at dbdimp.c line 271 at /home/bg/site/perl/lib/perl5/DBIx/Class/Storage/DBI.pm line 1109.
SQL was:
 CREATE TABLE dvd (
  id INTEGER PRIMARY KEY NOT NULL,
  name VARCHAR(255) NOT NULL,
  imdb_id INTEGER NOT NULL,
  owner INTEGER NOT NULL,
  current_owner INTEGER NOT NULL,
  creation_date date NOT NULL,
  alter_date datetime NOT NULL,
  hour time NOT NULL
) at /home/bg/site/perl/lib/perl5/DBIx/Class/Storage/DBI.pm line 1109.
DBD::SQLite::db do failed: table user_role already exists(1) at dbdimp.c line 271 at /home/bg/site/perl/lib/perl5/DBIx/Class/Storage/DBI.pm line 1109.
SQL was:
 CREATE TABLE user_role (
  user INTEGER NOT NULL,
  role INTEGER NOT NULL,
  PRIMARY KEY (user, role)
) at /home/bg/site/perl/lib/perl5/DBIx/Class/Storage/DBI.pm line 1109.
DBD::SQLite::db do failed: table user already exists(1) at dbdimp.c line 271 at /home/bg/site/perl/lib/perl5/DBIx/Class/Storage/DBI.pm line 1109.
SQL was:
 CREATE TABLE user (
  id INTEGER PRIMARY KEY NOT NULL,
  username VARCHAR(255) NOT NULL,
  password VARCHAR(255) NOT NULL,
  name VARCHAR(255) NOT NULL
) at /home/bg/site/perl/lib/perl5/DBIx/Class/Storage/DBI.pm line 1109.
DBD::SQLite::db do failed: table dvdtag already exists(1) at dbdimp.c line 271 at /home/bg/site/perl/lib/perl5/DBIx/Class/Storage/DBI.pm line 1109.
SQL was:
 CREATE TABLE dvdtag (
  dvd INTEGER NOT NULL,
  tag INTEGER NOT NULL,
  PRIMARY KEY (dvd, tag)
) at /home/bg/site/perl/lib/perl5/DBIx/Class/Storage/DBI.pm line 1109.
DBD::SQLite::db do failed: table tag already exists(1) at dbdimp.c line 271 at /home/bg/site/perl/lib/perl5/DBIx/Class/Storage/DBI.pm line 1109.
SQL was:
 CREATE TABLE tag (
  id INTEGER PRIMARY KEY NOT NULL,
  name VARCHAR(255) NOT NULL
) at /home/bg/site/perl/lib/perl5/DBIx/Class/Storage/DBI.pm line 1109.
DBD::SQLite::st execute failed: PRIMARY KEY must be unique(1) at dbdimp.c line 402 at /home/bg/site/perl/lib/perl5/DBIx/Class/Storage/DBI.pm line 771.
DBIx::Class::Schema::populate(): Error executing 'INSERT INTO user (id, name, password, username) VALUES (?, ?, ?, ?)': PRIMARY KEY must be unique(1) at dbdimp.c line 402 at t/100_create.t line 50
# Looks like your test died before it could output anything.
t/100_create....dubious                                                      
        Test returned status 255 (wstat 65280, 0xff00)
DIED. FAILED tests 1-4
        Failed 4/4 tests, 0.00% okay
Failed Test    Stat Wstat Total Fail  Failed  List of Failed
-------------------------------------------------------------------------------
t/100_create.t  255 65280     4    8 200.00%  1-4
Failed 1/2 test scripts, 50.00% okay. 4/7 subtests failed, 42.86% okay.
make: *** [test_dynamic] Error 2

--  
/"\ Goetz Bock at blacknet dot de  --  secure mobile Linux everNETting
\ /       (c) 2006 Creative Commons, Attribution-ShareAlike 2.0 de
 X   [ 1. Use descriptive subjects - 2. Edit a reply for brevity -  ]
/ \  [ 3. Reply to the list - 4. Read the archive *before* you post ]