On Sat, Mar 08, 2003 at 09:27:17AM -0500, Steven N. Hirsch wrote:
> Tim,
>
> I don't know if these items have been corrected in 1.35, since I cannot
> find it on any of the CPAN mirrors. Unless this is applied, proxy will
> not even pass regression tests due to compile errors:
All in except the last. I'll add that in for the next release.
Thanks.
Tim.
> --- DBI-1.34.orig/t/80proxy.t 2002-06-13 08:28:13.000000000 -0400
> +++ DBI-1.34/t/80proxy.t 2003-03-08 09:18:12.000000000 -0500
> @@ -103,7 +103,7 @@
> my $dsn = "DBI:Proxy:hostname=127.0.0.1;port=$port;debug=1;dsn=DBI:ExampleP:";
>
> print "Making a first connection and closing it immediately.\n";
> -Test(eval { DBI->connect($dsn, '', '', { 'PrintError' => 0 }) })
> +Test(eval { my $dbh = DBI->connect($dsn, '', '', { 'PrintError' => 0 });
> $dbh->disconnect })
> or print "Connect error: " . $DBI::errstr . "\n";
>
> print "Making a second connection.\n";
> @@ -392,6 +392,7 @@
> "\n");
> Test($csr_a->finish());
>
> +$dbh->disconnect;
>
> # Test $dbh->func()
> # print "Testing \$dbh->func().\n";
>