rkitover

diff --git a/Makefile.PL b/Makefile.PL
index 28d5dac..ecd609a 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -89,6 +89,14 @@ my $test_requires = {
   'Package::Stash'           => '0.28',
 };
 
+use FindBin '$Bin';
+require "$Bin/lib/DBIx/Class/Optional/Dependencies.pm";

rkitover

        (in cleanup) DBD::Pg::st FETCH failed: handle 3 is owned by thread 1ebf0d4 not current thread 30d7834 (handles can't be shared between threads and your driver may need a CLONE method added) at C:\Users\rkitover\src\dbic\lib/DBIx/Class/Storage/DBI/Cursor.pm line 182.
t/50fork.t ....................................... ok
Unhandled type: REGEXP at C:/Perl/site/lib/Devel/Cycle.pm line 107.
t/52leaks.t ...................................... ok
DBIx::Class::ResultSet::create(): Unable to safely perform "skimming type" limit with supplied unstable order criteria at t/inflate/datetime_msaccess.t line 71
# Tests were run but no plan was declared and done_testing() was not seen.
t/inflate/datetime_msaccess.t ....................
Dubious, test returned 255 (wstat 65280, 0xff00)
All 1 subtests passed
Win32::OLE(0.1709): GetOleObject() Not a Win32::OLE object at C:/Perl/lib/Win32/OLE/Lite.pm line 154 during global destruction.

rkitover

#!/bin/sh
# Start a Catalyst app under FastCGI
#
### BEGIN INIT INFO
# Provides: webapp
# Required-Start: $local_fs $network $named
# Required-Stop: $local_fs $network $named
# Should-Start: apache2
# Should-Stop: apache2
# Default-Start: 2 3 4 5

rkitover

DBIx::Class::Storage::DBI::__ANON__(): DBI Exception: DBD::SQLite::db do failed: file is encrypted or is not a database [for Statement "PRAGMA synchronous = OFF"] at t/lib/DBICTest.pm line 101
# Tests were run but no plan was declared and done_testing() was not seen.
t/storage/reconnect.t ............................
Dubious, test returned 255 (wstat 65280, 0xff00)
All 6 subtests passed
        (less 2 skipped subtests: 4 okay)

rkitover

#   Failed test 'No leaks of DBICTest::Schema=HASH(0x35b196c)'
#   at t/lib/DBICTest/Schema.pm line 78.
#     Reference first seen at C:\Users\rkitover\src\dbic\lib/DBIx/Class/Schema.pm line 529
#       invoked as DBIx::Class::Schema::connect at t/751msaccess.t line 63

rkitover

diff --git a/lib/DBIx/Class/Schema/Loader/DBI.pm b/lib/DBIx/Class/Schema/Loader/DBI.pm
index 1ed2fee..266eb50 100644
--- a/lib/DBIx/Class/Schema/Loader/DBI.pm
+++ b/lib/DBIx/Class/Schema/Loader/DBI.pm
@@ -405,7 +405,7 @@ sub _table_fk_info {
         my $relid   = ($raw_rel->[11] || ( "__dcsld__" . $i++ ));
 
         foreach my $var ($uk_scm, $uk_tbl, $uk_col, $fk_scm, $fk_col, $relid) {
-            $var =~ s/[\Q$self->{quote_char}\E]//g;
+            $var =~ s/[\Q$self->{quote_char}\E]//g if defined $var;

rkitover

#!/usr/bin/env perl

use DBI;
use strict;
use warnings;

my $h = DBI->connect(@ENV{map "DBICTEST_MSSQL_ODBC_$_", qw/DSN USER PASS/},
    {RaiseError => 1, PrintError => 0}
);

rkitover

OLE exception from "Microsoft SQL Server Native Client 10.0":

Cannot create new transaction because capacity was exceeded.

Win32::OLE(0.1709) error 0x8004d01d: "A request to establish a connection
with the transaction manager was denied"
    in METHOD/PROPERTYGET "BeginTrans" at C:/Perl/site/lib/DBD/ADO.pm line 967

#   Failed test 'created a row with explicit PK GUID via ->populate in void context'
#   at t/747mssql_ado.t line 234.

rkitover

#   Failed test 'search_related with multiple FKs from same table'
#   at t/lib/dbixcsl_common_tests.pm line 901.
#          got: undef
#     expected: '3'
t/10_07mssql_common.t ................... 607/908
#   Failed test 'search_related with multiple multi-col FKs from same table'
#   at t/lib/dbixcsl_common_tests.pm line 942.
#          got: undef
#     expected: '3'

rkitover

use strict;
use warnings;
use Test::More;
use Test::Exception;
use DBIx::Class::Schema::Loader;

# 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;