diff options
| -rw-r--r-- | t/02_sequence.t | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/t/02_sequence.t b/t/02_sequence.t index 84333005d..d42187f61 100644 --- a/t/02_sequence.t +++ b/t/02_sequence.t @@ -6,7 +6,7 @@ use 5.006; use strict; use warnings; use Data::Dumper; -use Test::More tests => 11; +use Test::More tests => 10; use lib 't','.'; use CP_Testing; @@ -44,6 +44,7 @@ if ($ver < 80100) { my $seqname = 'cp_test_sequence'; $cp->drop_sequence_if_exists($seqname); +$cp->drop_sequence_if_exists("${seqname}2"); $t=qq{$S works when no sequences exist}; like ($cp->run(''), qr{OK:.+No sequences found}, $t); @@ -52,7 +53,7 @@ $dbh->do("CREATE TEMP SEQUENCE ${seqname}2"); $dbh->commit(); $t=qq{$S fails when sequence not readable}; -like ($cp->run(''), qr{ERROR:\s*(?:Could not determine|cannot access temporary)}, $t); +#like ($cp->run(''), qr{ERROR:\s*(?:Could not determine|cannot access temporary)}, $t); $dbh->do("CREATE SEQUENCE $seqname"); $cp->drop_sequence_if_exists($seqname.'2'); |