From: Moritz Onken Date: Fri, 24 Apr 2009 14:27:20 +0000 (+0000) Subject: cleanup 72pg.t X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d093d3ebc026f144c1c30c4729981edf24a1adac;p=dbsrgits%2FDBIx-Class-Historic.git cleanup 72pg.t --- diff --git a/t/72pg.t b/t/72pg.t index aafe301..27cb1b6 100644 --- a/t/72pg.t +++ b/t/72pg.t @@ -256,19 +256,15 @@ SKIP: { }); } -#SKIP: { - #skip "Oracle Auto-PK tests are broken", 16; - - # test auto increment using sequences WITHOUT triggers - for (1..5) { +for (1..5) { my $st = $schema->resultset('SequenceTest')->create({ name => 'foo' }); is($st->pkid1, $_, "Oracle Auto-PK without trigger: First primary key"); is($st->pkid2, $_ + 9, "Oracle Auto-PK without trigger: Second primary key"); is($st->nonpkid, $_ + 19, "Oracle Auto-PK without trigger: Non-primary key"); - } - my $st = $schema->resultset('SequenceTest')->create({ name => 'foo', pkid1 => 55 }); - is($st->pkid1, 55, "Oracle Auto-PK without trigger: First primary key set manually"); -#} +} +my $st = $schema->resultset('SequenceTest')->create({ name => 'foo', pkid1 => 55 }); +is($st->pkid1, 55, "Oracle Auto-PK without trigger: First primary key set manually"); + END { if($dbh) {