From: Howard Chu <hyc@openldap.org>
Date: Fri, 4 Feb 2011 15:25:42 +0000 (+0000)
Subject: Cleanup config items on destroy
X-Git-Tag: OPENLDAP_REL_ENG_2_4_27~7
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=4560bd6a2f278f72cad7d127440ad2285f0e0b15;p=openldap

Cleanup config items on destroy
---

diff --git a/servers/slapd/back-perl/close.c b/servers/slapd/back-perl/close.c
index 24ad366627..893834b760 100644
--- a/servers/slapd/back-perl/close.c
+++ b/servers/slapd/back-perl/close.c
@@ -46,6 +46,12 @@ perl_back_db_destroy(
 	ConfigReply *cr
 )
 {
+	PerlBackend *pb = be->be_private;
+
+	ch_free( pb->pb_module_name.bv_val );
+	ber_bvarray_free( pb->pb_module_path );
+	ber_bvarray_free( pb->pb_module_config );
+
 	free( be->be_private );
 	be->be_private = NULL;