On Tue 26 Nov 2002 00:34, David Wheeler <[EMAIL PROTECTED]> wrote:
> On Monday, November 25, 2002, at 03:26 PM, Tim Bunce wrote:
>
> > They're about to be deprecated/changed/removed or something as
> > part of moving towards a $h->{HandleEvent} = sub { ... } interface.
> >
> > So far I've just gutted the DBIh_EVENT*() macros so they do nothing
> > (old drivers may use them at the point they set err & errstr but the
> > DBI never did much with them).\
>
> Naturally, DBD::Pg uses DBIh_EVENT2 in a couple of places:
>
> DBIh_EVENT2(h, ERROR_event, DBIc_ERR(imp_xxh),
> DBIc_ERRSTR(imp_xxh));
>
> But I imagine we can purge these, if necessary.
Only one line found:
dbdimp.ic: DBIh_EVENT2 (drh, ERROR_event, DBIc_ERR (imp_drh), DBIc_ERRSTR
(imp_drh));
it is in
int dbd_discon_all (SV *drh, imp_drh_t *imp_drh)
{
if (!dirty && !SvTRUE (perl_get_sv ("DBI::PERL_ENDING", 0))) {
sv_setiv (DBIc_ERR (imp_drh), (IV)1);
sv_setpv (DBIc_ERRSTR (imp_drh), "disconnect_all not implemented");
DBIh_EVENT2 (drh, ERROR_event, DBIc_ERR (imp_drh), DBIc_ERRSTR (imp_drh)
);
return (FALSE);
}
if (perl_destruct_level)
perl_destruct_level = 0;
return (FALSE);
} /* dbd_discon_all */
Which is probably just a copy from DBD-Oracle, because I don't have the
faintest idea what it's for :)
--
H.Merijn Brand Amsterdam Perl Mongers (http://amsterdam.pm.org/)
using perl-5.6.1, 5.8.0 & 633 on HP-UX 10.20 & 11.00, AIX 4.2, AIX 4.3,
WinNT 4, Win2K pro & WinCE 2.11 often with Tk800.024 &/| DBD-Unify
ftp://ftp.funet.fi/pub/languages/perl/CPAN/authors/id/H/HM/HMBRAND/
