Thanks Eric.
On 17/11/05 12:19 -0800, Eric Wilhelm wrote: > # from Ingy dot Net > # on Thursday 17 November 2005 11:19 am: > > >3) Fix any bugs that have accumulated in the last 3 years. > > Yeah. I've had 0.45 in my /svn/ since Oct 2004 :-) > > Inline::CPP calls Inline::C::validate() twice and this kills the > existing INC values. Thus, validate should either slap the caller or > be allowed to run twice. Patch below. > > --Eric > -- > A counterintuitive sansevieria trifasciata was once literalized > guiltily. > --Product of Artificial Intelligence > --------------------------------------------------- > http://scratchcomputing.com > --------------------------------------------------- > > Index: Inline-C/Inline/C.pm > =================================================================== > --- Inline-C/Inline/C.pm (revision 295) > +++ Inline-C/Inline/C.pm (revision 572) > @@ -1,5 +1,5 @@ > package Inline::C; > -$VERSION = '0.44'; > +$VERSION = '0.45'; > > use strict; > require Inline; > @@ -43,7 +43,8 @@ > $o->{ILSM}{MAKEFILE} ||= {}; > if (not $o->UNTAINT) { > require FindBin; > - $o->{ILSM}{MAKEFILE}{INC} = "-I$FindBin::Bin"; > + ($o->{ILSM}{MAKEFILE}{INC} =~ m/-I$FindBin::Bin/) or > + ($o->{ILSM}{MAKEFILE}{INC} = "-I$FindBin::Bin"); > } > $o->{ILSM}{AUTOWRAP} = 0 if not defined $o->{ILSM}{AUTOWRAP}; > $o->{ILSM}{XSMODE} = 0 if not defined $o->{ILSM}{XSMODE};
