Author: byterock
Date: Fri Dec 21 10:02:44 2007
New Revision: 10449
Modified:
dbd-oracle/trunk/t/56embbeded.t
Log:
one more change for RC6
Modified: dbd-oracle/trunk/t/56embbeded.t
==============================================================================
--- dbd-oracle/trunk/t/56embbeded.t (original)
+++ dbd-oracle/trunk/t/56embbeded.t Fri Dec 21 10:02:44 2007
@@ -36,7 +36,15 @@
my $table = "table_embed";
my $type = $table.'a_type';
-
+#do not warn if already there
+eval {
+ local $dbh->{PrintError} = 0;
+ $dbh->do(qq{drop TABLE $table });
+};
+eval {
+ local $dbh->{PrintError} = 0;
+ $dbh->do(qq{drop TYPE $type });
+};
$dbh->do(qq{CREATE or replace TYPE $type as varray(10) of varchar(30) });
$dbh->do(qq{
