add support for DBICTEST_MSSQL_PERL5LIB to 74mssql.t
Rafael Kitover [Thu, 11 Jun 2009 23:48:28 +0000 (23:48 +0000)]
t/74mssql.t

index 49f7967..72e6552 100644 (file)
@@ -1,6 +1,13 @@
 use strict;
 use warnings;  
 
+# use this if you keep a copy of DBD::Sybase linked to FreeTDS somewhere else
+BEGIN {
+  if (my $lib_dirs = $ENV{DBICTEST_MSSQL_PERL5LIB}) {
+    unshift @INC, $_ for split /:/, $lib_dirs;
+  }
+}
+
 use Test::More;
 use lib qw(t/lib);
 use DBICTest;