[Bast-commits] r6091 - trunk/DBIx-Class-EncodedColumn/t

[dandv at dev.catalyst.perl.org]

Author: dandv
Date: 2009-05-01 16:19:14 +0100 (Fri, 01 May 2009)
New Revision: 6091

Modified:
   trunk/DBIx-Class-EncodedColumn/t/02digest.t
Log:
moved ->clear to the END section so that the test DB file gets closed before we attempt to unlink it

Modified: trunk/DBIx-Class-EncodedColumn/t/02digest.t
===================================================================
--- trunk/DBIx-Class-EncodedColumn/t/02digest.t	2009-05-01 15:17:25 UTC (rev 6090)
+++ trunk/DBIx-Class-EncodedColumn/t/02digest.t	2009-05-01 15:19:14 UTC (rev 6091)
@@ -178,7 +178,10 @@
 
 }
 
-DigestTest->clear;
+END {
+  # In the END section so that the test DB file gets closed before we attempt to unlink it
+  DigestTest->clear;
+}
 
 #TODO
 # -- dies_ok tests when using invalid cyphers and encodings