Thanks much. I'll be returning from travel early next week and will look into this then.
-- Jeff > -----Original Message----- > From: Jan Dubois [mailto:[EMAIL PROTECTED] > Sent: Thursday, August 12, 2004 02:01 AM > To: [EMAIL PROTECTED] > Cc: ''Tim Bunce'', [EMAIL PROTECTED] > Subject: Re: DBI-1.43 + DBD-CSV-0.21 > > Merijn wrote: > > > >HP-UX 11i (11.11) + perl-5.8.5-dor + DBI-1.43 + DBD-CSV-0.21 > > > >Failed Test Stat Wstat Total Fail Failed List of Failed > >------------------------------------------------------------------------------- > >t/40bindparam.t 28 1 3.57% 14 > >Failed 1/14 test scripts, 92.86% okay. 1/244 subtests failed, 99.59% okay. > > The reason for the failure is the new finish() method in DBD::File::st. > Previously it implicitly inherited from DBI::st::finish which always > ended with "return 1". I would suggest just adding the "return 1" to > the end of DBD::File::st::finish(). > > Cheers, > -Jan > > --- DBI/lib/DBD/File.pm.~1~ Wed Aug 11 18:45:01 2004 > +++ DBI/lib/DBD/File.pm Wed Aug 11 18:45:01 2004 > @@ -441,6 +441,7 @@ > my $sth = shift; > $sth->{Active}=0; > delete $sth->{f_stmt}->{data}; > + return 1; > } > sub fetch ($) { > my $sth = shift; > End of Patch. > > >
