ITS#1882: fix typo

diff --git a/servers/slapd/back-perl/modify.c b/servers/slapd/back-perl/modify.c
index 0e2f570eab484947798f08ec0674ba49dfc3897a..5d13518fe67ebddb0fdb59c921237b234da372f2 100644 (file)
--- a/servers/slapd/back-perl/modify.c
+++ b/servers/slapd/back-perl/modify.c
@@ -69,7 +69,7 @@ perl_back_modify(
                        }
 
                        
-                       XPUSHs(sv_2mortal(newSVpv( mods->sm_desc.ad_cname.bv_val, 0 )));
+                       XPUSHs(sv_2mortal(newSVpv( mods->sm_desc->ad_cname.bv_val, 0 )));
 
                        for ( i = 0;
                                mods->sm_bvalues != NULL && mods->sm_bvalues[i].bv_val != NULL;