X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=dbsrgits%2FDBIx-Class.git;a=blobdiff_plain;f=t%2F750firebird.t;h=3618edf97422d94622e8a1210e9e387ebc5b829a;hp=49443b24fa21dd49e79d172440a3eed3a515a658;hb=07cda1c5a7df6656772dfd65c488c19c15126168;hpb=f32e99f9ba84497e4d0adc44a650a891683fa7bd diff --git a/t/750firebird.t b/t/750firebird.t index 49443b2..3618edf 100644 --- a/t/750firebird.t +++ b/t/750firebird.t @@ -75,11 +75,11 @@ EOF EOF $dbh->do('ALTER TABLE "sequence_test" ADD CONSTRAINT "sequence_test_constraint" PRIMARY KEY ("pkid1", "pkid2")'); eval { $dbh->do('DROP GENERATOR "pkid1_seq"') }; - eval { $dbh->do('DROP GENERATOR "pkid2_seq"') }; + eval { $dbh->do('DROP GENERATOR pkid2_seq') }; eval { $dbh->do('DROP GENERATOR "nonpkid_seq"') }; $dbh->do('CREATE GENERATOR "pkid1_seq"'); - $dbh->do('CREATE GENERATOR "pkid2_seq"'); - $dbh->do('SET GENERATOR "pkid2_seq" TO 9'); + $dbh->do('CREATE GENERATOR pkid2_seq'); + $dbh->do('SET GENERATOR pkid2_seq TO 9'); $dbh->do('CREATE GENERATOR "nonpkid_seq"'); $dbh->do('SET GENERATOR "nonpkid_seq" TO 19'); @@ -272,9 +272,13 @@ sub cleanup { eval { $dbh->do('DROP TRIGGER "artist_bi"') }; diag $@ if $@; - foreach my $generator (qw/gen_artist_artistid pkid1_seq pkid2_seq - nonpkid_seq/) { - eval { $dbh->do(qq{DROP GENERATOR "$generator"}) }; + foreach my $generator (qw/ + "gen_artist_artistid" + "pkid1_seq" + pkid2_seq + "nonpkid_seq" + /) { + eval { $dbh->do(qq{DROP GENERATOR $generator}) }; diag $@ if $@; }