Return-Path: Delivered-To: apmail-perl-modperl-cvs-archive@www.apache.org Received: (qmail 71225 invoked from network); 4 May 2004 06:12:35 -0000 Received: from daedalus.apache.org (HELO mail.apache.org) (208.185.179.12) by minotaur-2.apache.org with SMTP; 4 May 2004 06:12:35 -0000 Received: (qmail 68451 invoked by uid 500); 4 May 2004 06:12:03 -0000 Delivered-To: apmail-perl-modperl-cvs-archive@perl.apache.org Received: (qmail 68420 invoked by uid 500); 4 May 2004 06:12:03 -0000 Mailing-List: contact modperl-cvs-help@perl.apache.org; run by ezmlm Precedence: bulk list-help: list-unsubscribe: list-post: Reply-To: dev@perl.apache.org Delivered-To: mailing list modperl-cvs@perl.apache.org Received: (qmail 68399 invoked by uid 500); 4 May 2004 06:12:02 -0000 Delivered-To: apmail-modperl-2.0-cvs@apache.org Date: 4 May 2004 06:12:24 -0000 Message-ID: <20040504061224.71091.qmail@minotaur.apache.org> From: stas@apache.org To: modperl-2.0-cvs@apache.org Subject: cvs commit: modperl-2.0/src/modules/perl modperl_callback.c X-Spam-Rating: daedalus.apache.org 1.6.2 0/1000/N X-Spam-Rating: minotaur-2.apache.org 1.6.2 0/1000/N stas 2004/05/03 23:12:24 Modified: src/modules/perl modperl_callback.c Log: as ERRSV is an object, we no longer can read its PVX slot directly, but need to get the magic invoked Revision Changes Path 1.72 +2 -2 modperl-2.0/src/modules/perl/modperl_callback.c Index: modperl_callback.c =================================================================== RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_callback.c,v retrieving revision 1.71 retrieving revision 1.72 diff -u -u -r1.71 -r1.72 --- modperl_callback.c 2 May 2004 21:01:01 -0000 1.71 +++ modperl_callback.c 4 May 2004 06:12:24 -0000 1.72 @@ -121,7 +121,7 @@ status = SvIVx(status_sv); MP_TRACE_h(MP_FUNC, "coercing handler %s's return value '%s' into %d", - handler->name, SvPVX(status_sv), status); + handler->name, SvPV_nolen(status_sv), status); } else { /* any other return types are considered as errors */ @@ -138,7 +138,7 @@ FREETMPS;LEAVE; if (SvTRUE(ERRSV)) { - MP_TRACE_h(MP_FUNC, "$@ = %s", SvPVX(ERRSV)); + MP_TRACE_h(MP_FUNC, "$@ = %s", SvPV_nolen(ERRSV)); status = HTTP_INTERNAL_SERVER_ERROR; }