Return-Path: <modperl-cvs-owner-modperl-cvs-archive=hyperreal.org@apache.org>
Delivered-To: modperl-cvs-archive@hyperreal.org
Received: (qmail 23989 invoked by uid 6000); 20 Nov 1998 18:55:08 -0000
Received: (qmail 23944 invoked by uid 169); 20 Nov 1998 18:55:07 -0000
Date: 20 Nov 1998 18:55:07 -0000
Message-ID: <19981120185507.23940.qmail@hyperreal.org>
From: dougm@hyperreal.org
To: modperl-cvs@hyperreal.org
Subject: cvs commit: modperl/src/modules/perl Apache.xs
Sender: modperl-cvs-owner@apache.org
Precedence: bulk
Reply-To: modperl-cvs@apache.org

dougm       98/11/20 10:55:06

  Modified:    .        Changes
               src/modules/perl Apache.xs
  Log:
  fixed refcnt bug in $r->current_callback
  
  Revision  Changes    Path
  1.204     +2 -0      modperl/Changes
  
  Index: Changes
  ===================================================================
  RCS file: /export/home/cvs/modperl/Changes,v
  retrieving revision 1.203
  retrieving revision 1.204
  diff -u -r1.203 -r1.204
  --- Changes	1998/11/20 04:15:56	1.203
  +++ Changes	1998/11/20 18:55:02	1.204
  @@ -8,6 +8,8 @@
   
   =item 1.16_01-dev
   
  +fixed refcnt bug in $r->current_callback
  +
   some Apache::Constants updates (see the .pod) and new export() method
   
   ensure @INC value from startup time is always properly saved
  
  
  
  1.66      +1 -1      modperl/src/modules/perl/Apache.xs
  
  Index: Apache.xs
  ===================================================================
  RCS file: /export/home/cvs/modperl/src/modules/perl/Apache.xs,v
  retrieving revision 1.65
  retrieving revision 1.66
  diff -u -r1.65 -r1.66
  --- Apache.xs	1998/11/20 04:16:07	1.65
  +++ Apache.xs	1998/11/20 18:55:06	1.66
  @@ -359,7 +359,7 @@
       Apache     r
   
       CODE:
  -    RETVAL = perl_get_sv("Apache::__CurrentCallback", TRUE);
  +    RETVAL = newSVsv(perl_get_sv("Apache::__CurrentCallback", TRUE));
   
       OUTPUT:
       RETVAL