perl-modperl-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From tors...@apache.org
Subject svn commit: r1241435 - /perl/modperl/trunk/src/modules/perl/modperl_module.c
Date Tue, 07 Feb 2012 12:00:45 GMT
Author: torsten
Date: Tue Feb  7 12:00:45 2012
New Revision: 1241435

URL: http://svn.apache.org/viewvc?rev=1241435&view=rev
Log:
Fix a small bug in a debugging message in modperl_module.c. It tried to
print a modperl_mgv_t* as %s.

Modified:
    perl/modperl/trunk/src/modules/perl/modperl_module.c

Modified: perl/modperl/trunk/src/modules/perl/modperl_module.c
URL: http://svn.apache.org/viewvc/perl/modperl/trunk/src/modules/perl/modperl_module.c?rev=1241435&r1=1241434&r2=1241435&view=diff
==============================================================================
--- perl/modperl/trunk/src/modules/perl/modperl_module.c (original)
+++ perl/modperl/trunk/src/modules/perl/modperl_module.c Tue Feb  7 12:00:45 2012
@@ -297,8 +297,8 @@ modperl_module_config_create_obj(pTHX_
     }
 
     MP_TRACE_c(MP_FUNC, "%s cfg=0x%lx for %s.%s",
-               method, (unsigned long)cfg,
-               mname, parms->cmd->name);
+               method ? modperl_mgv_last_name(method) : "NULL",
+               (unsigned long)cfg, mname, parms->cmd->name);
 
     /* used by merge functions to get a Perl interp */
     cfg->server = parms->server;



Mime
View raw message