Revert "ITS#7325 fix entry len"

This reverts commit 348d43e82f.
This commit is contained in:
Quanah Gibson-Mount 2012-07-26 13:59:50 -07:00
parent f425a07d02
commit 5302323a7f

View file

@ -25,7 +25,6 @@ perl_back_add(
PerlBackend *perl_back = (PerlBackend *) op->o_bd->be_private;
int len;
int count;
char *str;
PERL_SET_CONTEXT( PERL_INTERPRETER );
ldap_pvt_thread_mutex_lock( &perl_interpreter_mutex );
@ -36,8 +35,7 @@ perl_back_add(
PUSHMARK(sp);
XPUSHs( perl_back->pb_obj_ref );
str = entry2str( op->ora_e, &len );
XPUSHs(sv_2mortal(newSVpv( str, len )));
XPUSHs(sv_2mortal(newSVpv( entry2str( op->ora_e, &len ), len )));
PUTBACK;