perl-modperl-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From do...@hyperreal.org
Subject cvs commit: modperl/src/modules/perl mod_perl.c
Date Thu, 09 Dec 1999 05:32:29 GMT
dougm       99/12/08 21:32:28

  Modified:    .        Changes
               src/modules/perl mod_perl.c
  Log:
  change PL_siggv usage to gv_fetchpv("SIG", ...) for Perl 5.6-tobe
  
  Revision  Changes    Path
  1.360     +3 -0      modperl/Changes
  
  Index: Changes
  ===================================================================
  RCS file: /home/cvs/modperl/Changes,v
  retrieving revision 1.359
  retrieving revision 1.360
  diff -u -r1.359 -r1.360
  --- Changes	1999/11/25 18:49:25	1.359
  +++ Changes	1999/12/09 05:32:20	1.360
  @@ -10,6 +10,9 @@
   
   =item 1.21_01-dev
   
  +change PL_siggv usage to gv_fetchpv("SIG", ...) for Perl 5.6-tobe
  +[Andreas J. Koenig <andreas.koenig@anima.de>]
  +
   document $r->get_handlers, $r->set_handlers, $r->push_handlers
   [Eric Cholet <cholet@logilune.com>]
   
  
  
  
  1.92      +3 -2      modperl/src/modules/perl/mod_perl.c
  
  Index: mod_perl.c
  ===================================================================
  RCS file: /home/cvs/modperl/src/modules/perl/mod_perl.c,v
  retrieving revision 1.91
  retrieving revision 1.92
  diff -u -r1.91 -r1.92
  --- mod_perl.c	1999/08/16 07:50:15	1.91
  +++ mod_perl.c	1999/12/09 05:32:26	1.92
  @@ -752,6 +752,7 @@
       dPPREQ;
       dTHR;
       SV *nwvh = Nullsv;
  +    GV *gv = gv_fetchpv("SIG", TRUE, SVt_PVHV);
   
       (void)acquire_mutex(mod_perl_mutex);
       
  @@ -780,8 +781,8 @@
   	}
       }
   
  -    if (siggv) {
  -	save_hptr(&GvHV(siggv)); 
  +    if (gv) {
  +	save_hptr(&GvHV(gv)); 
       }
   
       if (endav) {
  
  
  

Mime
View raw message