Greg Sabino Mullane wrote:
Hmm...what if we did this?: Index: plperl.c =================================================================== RCS file: /projects/cvsroot/pgsql/src/pl/plperl/plperl.c,v retrieving revision 1.92 diff -r1.92 plperl.c 671c671 < XPUSHs(sv_2mortal(newSVpv("my $_TD=$_[0]; shift;", 0))); ---XPUSHs(sv_2mortal(newSVpv("our $_TD=$_[0]; shift;", 0)));
That would probably work, but it would ONLY deal with the issue for $_TD. In your function $event will still hit this problem.
see next email for sidcussion of warnings. cheers andrew ---------------------------(end of broadcast)--------------------------- TIP 6: explain analyze is your friend
