X-Git-Url: https://git.sur5r.net/?a=blobdiff_plain;f=servers%2Fslapd%2Fback-perl%2Fclose.c;h=8e320e6b590728e264dfc608545abe58b06f8a20;hb=433e8ad64544c9abacdc5727a39a1fbc5d826f55;hp=34d5a78f15ce94e3cdcaa79a1abe1298898d0cd4;hpb=b7beec16639919fa80f76f0e72db9afde77d32be;p=openldap

diff --git a/servers/slapd/back-perl/close.c b/servers/slapd/back-perl/close.c
index 34d5a78f15..8e320e6b59 100644
--- a/servers/slapd/back-perl/close.c
+++ b/servers/slapd/back-perl/close.c
@@ -32,11 +32,11 @@ perl_back_close(
 	Backend *be
 )
 {
-	pthread_mutex_lock( &perl_interpreter_mutex );	
+	ldap_pvt_thread_mutex_lock( &perl_interpreter_mutex );	
 
 	perl_destruct(perl_interpreter);
 	perl_free(perl_interpreter);
 
-	pthread_mutex_unlock( &perl_interpreter_mutex );	
+	ldap_pvt_thread_mutex_unlock( &perl_interpreter_mutex );	
 }