dougm 01/03/15 22:35:18
Modified: src/modules/perl modperl_config.h
Log:
allow modperl_config_req_get() to not core-dump if r == NULL
Revision Changes Path
1.23 +2 -2 modperl-2.0/src/modules/perl/modperl_config.h
Index: modperl_config.h
===================================================================
RCS file: /home/cvs/modperl-2.0/src/modules/perl/modperl_config.h,v
retrieving revision 1.22
retrieving revision 1.23
diff -u -r1.22 -r1.23
--- modperl_config.h 2001/03/16 05:52:29 1.22
+++ modperl_config.h 2001/03/16 06:35:18 1.23
@@ -27,8 +27,8 @@
}
#define modperl_config_req_get(r) \
- (modperl_config_req_t *) \
- ap_get_module_config(r->request_config, &perl_module)
+ (r ? (modperl_config_req_t *) \
+ ap_get_module_config(r->request_config, &perl_module) : NULL)
#define MP_dRCFG \
modperl_config_req_t *rcfg = modperl_config_req_get(r)
