this patch allows correctly handling magical imp_data scalars (which is
the case when a variable is coming from a thread::shared variable.
Index: DBI.xs
===================================================================
--- DBI.xs (revision 962)
+++ DBI.xs (working copy)
@@ -993,6 +993,8 @@
if ((svp = hv_fetch((HV*)SvRV(h), "dbi_imp_data", 12, 0))) {
dbi_imp_data = *svp;
+ if (SvGMAGICAL(dbi_imp_data)) /* call FETCH via magic */
+ mg_get(dbi_imp_data);
}
DBI_LOCK;
--
__________________________________________________________________
Stas Bekman JAm_pH ------> Just Another mod_perl Hacker
http://stason.org/ mod_perl Guide ---> http://perl.apache.org
mailto:[EMAIL PROTECTED] http://use.perl.org http://apacheweek.com
http://modperlbook.org http://apache.org http://ticketmaster.com
