cvs commit: modperl-2.0/src/modules/perl modperl_perl.c

[dougm]

dougm       01/12/10 20:43:36

  Modified:    src/modules/perl modperl_perl.c
  Log:
  s/pTHX_/aTHX_/ when calling END blocks at shutdown
  Submitted by: stas
  Reviewed by:  dougm
  
  Revision  Changes    Path
  1.10      +1 -1      modperl-2.0/src/modules/perl/modperl_perl.c
  
  Index: modperl_perl.c
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_perl.c,v
  retrieving revision 1.9
  retrieving revision 1.10
  diff -u -r1.9 -r1.10
  --- modperl_perl.c    2001/12/11 04:22:32     1.9
  +++ modperl_perl.c    2001/12/11 04:43:36     1.10
  @@ -101,7 +101,7 @@
   #endif
   
       if (PL_endav) {
  -        modperl_perl_call_list(pTHX_ PL_endav, "END");
  +        modperl_perl_call_list(aTHX_ PL_endav, "END");
       }
   
       perl_destruct(perl);