| author | Vladimir Marek <Vladimir.Marek@oracle.com> |
| Tue, 26 Jul 2016 07:06:37 -0700 | |
| changeset 6534 | 7944bbb85989 |
| parent 5913 | 02e8b39413b9 |
| permissions | -rw-r--r-- |
|
5913
02e8b39413b9
PSARC/2016/072 DBD::mysql perl module integration to Solaris
Vladimir Marek <Vladimir.Marek@oracle.com>
parents:
diff
changeset
|
1 |
https://rt.cpan.org/Public/Bug/Display.html?id=112072 |
|
02e8b39413b9
PSARC/2016/072 DBD::mysql perl module integration to Solaris
Vladimir Marek <Vladimir.Marek@oracle.com>
parents:
diff
changeset
|
2 |
|
|
02e8b39413b9
PSARC/2016/072 DBD::mysql perl module integration to Solaris
Vladimir Marek <Vladimir.Marek@oracle.com>
parents:
diff
changeset
|
3 |
--- DBD-mysql-4.033/t/05dbcreate.t 2016-02-13 13:29:56.467130717 -0800 |
|
02e8b39413b9
PSARC/2016/072 DBD::mysql perl module integration to Solaris
Vladimir Marek <Vladimir.Marek@oracle.com>
parents:
diff
changeset
|
4 |
+++ DBD-mysql-4.033/t/05dbcreate.t 2016-02-13 13:23:45.371688976 -0800 |
|
02e8b39413b9
PSARC/2016/072 DBD::mysql perl module integration to Solaris
Vladimir Marek <Vladimir.Marek@oracle.com>
parents:
diff
changeset
|
5 |
@@ -10,7 +10,7 @@ use lib 't', '.'; |
|
02e8b39413b9
PSARC/2016/072 DBD::mysql perl module integration to Solaris
Vladimir Marek <Vladimir.Marek@oracle.com>
parents:
diff
changeset
|
6 |
require 'lib.pl'; |
|
02e8b39413b9
PSARC/2016/072 DBD::mysql perl module integration to Solaris
Vladimir Marek <Vladimir.Marek@oracle.com>
parents:
diff
changeset
|
7 |
|
|
02e8b39413b9
PSARC/2016/072 DBD::mysql perl module integration to Solaris
Vladimir Marek <Vladimir.Marek@oracle.com>
parents:
diff
changeset
|
8 |
my $dbh; |
|
02e8b39413b9
PSARC/2016/072 DBD::mysql perl module integration to Solaris
Vladimir Marek <Vladimir.Marek@oracle.com>
parents:
diff
changeset
|
9 |
-eval {$dbh= DBI->connect('DBI:mysql:', $test_user, $test_password,
|
|
02e8b39413b9
PSARC/2016/072 DBD::mysql perl module integration to Solaris
Vladimir Marek <Vladimir.Marek@oracle.com>
parents:
diff
changeset
|
10 |
+eval {$dbh= DBI->connect($test_dsn, $test_user, $test_password,
|
|
02e8b39413b9
PSARC/2016/072 DBD::mysql perl module integration to Solaris
Vladimir Marek <Vladimir.Marek@oracle.com>
parents:
diff
changeset
|
11 |
{ RaiseError => 1, PrintError => 1, AutoCommit => 0 });};
|
|
02e8b39413b9
PSARC/2016/072 DBD::mysql perl module integration to Solaris
Vladimir Marek <Vladimir.Marek@oracle.com>
parents:
diff
changeset
|
12 |
if ($@) {
|
|
02e8b39413b9
PSARC/2016/072 DBD::mysql perl module integration to Solaris
Vladimir Marek <Vladimir.Marek@oracle.com>
parents:
diff
changeset
|
13 |
diag $@; |