Index: mod_embperl.c
===================================================================
--- mod_embperl.c	(revision 355598)
+++ mod_embperl.c	(working copy)
@@ -953,10 +953,11 @@
             ap_log_error (APLOG_MARK, APLOG_WARNING | APLOG_NOERRNO, APLOG_STATUSCODE NULL, "EmbperlDebug: Get: about to convert "#CFGNAME" (type="#TYPE";CV) to perl data: %s\n", pDirCfg -> save_##STRUCT##NAME) ; \
 \
         if ((rc = EvalConfig (pApp, sv_2mortal(newSVpv(pDirCfg -> save_##STRUCT##NAME, 0)), 0, NULL, "Configuration: EMBPERL_"#CFGNAME, &pDirCfg -> STRUCT.NAME)) != ok) \
-            LogError (pReq, rc) ; \
-            return rc ; \
+            pDirCfg -> STRUCT.NAME = NULL ; \
+        tainted = 0 ; \
         } \
-    SvREFCNT_inc((SV *)(pDirCfg -> STRUCT.NAME)) ;
+    if (pDirCfg -> STRUCT.NAME) \
+        SvREFCNT_inc((SV *)(pDirCfg -> STRUCT.NAME)) ;
 
 
 #undef EPCFG_AV
@@ -994,10 +995,11 @@
             ap_log_error (APLOG_MARK, APLOG_WARNING | APLOG_NOERRNO, APLOG_STATUSCODE NULL, "EmbperlDebug: Get: about to convert "#CFGNAME" (type="#TYPE";REGEX) to perl data: %s\n", pDirCfg -> save_##STRUCT##NAME) ; \
 \
         if ((rc = EvalRegEx (pApp, pDirCfg -> save_##STRUCT##NAME, "Configuration: EMBPERL_"#CFGNAME, &pDirCfg -> STRUCT.NAME)) != ok) \
-            return rc ; \
+            pDirCfg -> STRUCT.NAME = NULL ; \
         tainted = 0 ; \
         } \
-    SvREFCNT_inc((SV *)(pDirCfg -> STRUCT.NAME)) ;
+    if (pDirCfg -> STRUCT.NAME) \
+        SvREFCNT_inc((SV *)(pDirCfg -> STRUCT.NAME)) ;
 
 
 /*---------------------------------------------------------------------------

