From fb1bf1caa82aa75eb5924e8c338da11f47854408 Mon Sep 17 00:00:00 2001 From: Jan Synacek Date: Fri, 24 Apr 2015 13:39:33 +0200 Subject: [PATCH] More for ITS#8105 Fix multiple argument handling. For example: perlModuleConfig homedir /home/jsynacek should be converted to olcPerlModuleConfig: homedir /home/jsynacek and not to olcPerlModuleConfig: homedir olcPerlModuleConfig: /home/jsynacek --- servers/slapd/back-perl/config.c | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/servers/slapd/back-perl/config.c b/servers/slapd/back-perl/config.c index 83acd935a6..c99c50e643 100644 --- a/servers/slapd/back-perl/config.c +++ b/servers/slapd/back-perl/config.c @@ -219,12 +219,11 @@ perl_cf( XPUSHs( pb->pb_obj_ref ); /* Put all arguments on the perl stack */ - for( args = 1; args < c->argc; args++ ) { + for( args = 1; args < c->argc; args++ ) XPUSHs(sv_2mortal(newSVpv(c->argv[args], 0))); - ber_str2bv( c->argv[args], 0, 0, &bv ); - value_add_one( &pb->pb_module_config, &bv ); - } + ber_str2bv( c->line + STRLENOF("perlModuleConfig "), 0, 0, &bv ); + value_add_one( &pb->pb_module_config, &bv ); PUTBACK ; -- 2.39.5