[Bast-commits] r4210 - DBIx-Class/0.08/trunk/t

[ilmari at dev.catalyst.perl.org]

Author: ilmari
Date: 2008-03-15 05:20:13 +0000 (Sat, 15 Mar 2008)
New Revision: 4210

Modified:
   DBIx-Class/0.08/trunk/t/745db2.t
Log:
$dbh->doe doesn't take (Raise|Print)Error attributes, use eval {} instead.


Modified: DBIx-Class/0.08/trunk/t/745db2.t
===================================================================
--- DBIx-Class/0.08/trunk/t/745db2.t	2008-03-15 05:08:34 UTC (rev 4209)
+++ DBIx-Class/0.08/trunk/t/745db2.t	2008-03-15 05:20:13 UTC (rev 4210)
@@ -18,7 +18,7 @@
 
 my $dbh = $schema->storage->dbh;
 
-$dbh->do("DROP TABLE artist", { RaiseError => 0, PrintError => 0 });
+eval { $dbh->do("DROP TABLE artist") };
 
 $dbh->do("CREATE TABLE artist (artistid INTEGER GENERATED BY DEFAULT AS IDENTITY (START WITH 1, INCREMENT BY 1), name VARCHAR(255), charfield CHAR(10));");