Commit 8b51bb31 authored by Jan Synacek's avatar Jan Synacek Committed by Quanah Gibson-Mount
Browse files

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
parent 02600aaf
......@@ -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 ;
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment