From faec2bbedb0c1e919685f47df753a4d23223322c Mon Sep 17 00:00:00 2001 From: Jeff Boes Date: Wed, 3 Jun 2009 15:14:45 -0400 Subject: [PATCH] Drop sequence at end of test (preserve original state of database) --- t/02_sequence.t | 2 ++ 1 file changed, 2 insertions(+) diff --git a/t/02_sequence.t b/t/02_sequence.t index 8f10f701c..3bde49b54 100644 --- a/t/02_sequence.t +++ b/t/02_sequence.t @@ -57,6 +57,8 @@ like ($cp->run(''), qr{ERROR:\s*(?:Could not determine|cannot access temporary)} $dbh->do("CREATE SEQUENCE $seqname"); $cp->drop_sequence_if_exists($seqname.'2'); +END { $cp->drop_sequence_if_exists($seqname) } + $t=qq{$S returns correct information for a new sequence}; like ($cp->run(''), qr{OK:.+public.cp_test_sequence=0% \(calls left=9223372036854775806\)}, $t); -- 2.39.5