Pull fixes from bug # 267 from the head

diff --git a/src/modules/rlm_perl/rlm_perl.c b/src/modules/rlm_perl/rlm_perl.c
index 3da6e7a..8b46bab 100644 (file)
--- a/src/modules/rlm_perl/rlm_perl.c
+++ b/src/modules/rlm_perl/rlm_perl.c
@@ -1270,6 +1270,9 @@ static int perl_detach(void *instance)
        if (inst->func_accounting) free(inst->func_accounting);
        if (inst->func_preacct) free(inst->func_preacct);
        if (inst->func_checksimul) free(inst->func_checksimul);
+       if (inst->func_pre_proxy) free(inst->func_pre_proxy);
+       if (inst->func_post_proxy) free(inst->func_post_proxy);
+       if (inst->func_post_auth) free(inst->func_post_auth);
        if (inst->func_detach) free(inst->func_detach);
 
 #ifdef USE_ITHREADS