[svn:dbi] r14322 - dbi/trunk/t

Author: theory
Date: Tue Aug 10 14:38:22 2010
New Revision: 14322

Modified:
   dbi/trunk/t/01basics.t

Log:
Add Win32 workaround to disable annoying popups. Only relevant when running
tests from the repo, but still nice to handle. Patch from Jan Dubois.



Modified: dbi/trunk/t/01basics.t
==============================================================================
--- dbi/trunk/t/01basics.t	(original)
+++ dbi/trunk/t/01basics.t	Tue Aug 10 14:38:22 2010
@@ -290,6 +290,10 @@
 SKIP: {
 	skip 'developer tests', 4 unless -d ".svn" || -d ".git";
 
+    if ($^O eq "MSWin32" && eval { require Win32API::File }) {
+        Win32API::File::SetErrorMode(Win32API::File::SEM_FAILCRITICALERRORS());
+    }
+
 	print "Test DBI->installed_versions (for @drivers)\n";
 	print "(If one of those drivers, or the configuration for it, is bad\n";
 	print "then these tests can kill or freeze the process here. That's not the DBI's fault.)\n";