Revision 22

Date:
2009/03/16 10:12:57
Author:
dpavlin
Revision Log:
support ARRAY values from yaml file
Files:

Legend:

 
Added
 
Removed
 
Modified

  • bin/ldap-rewrite.pl

     
    108 108 foreach my $type ( keys %$data ) {
    109 109
    110 110 my $vals = $data->{$type};
    111 $vals =~ s{#\s*$}{};
    112
    113 my @vals = split(/\s*#\s*/, $vals);
    114 111
    115 push @{ $response->{protocolOp}->{searchResEntry}->{attributes} },
    116 { type => $config->{overlay_prefix} . $type, vals => [ @vals ] };
    112 push @{ $response->{protocolOp}->{searchResEntry}->{attributes} }, {
    113 type => $config->{overlay_prefix} . $type,
    114 vals => ref($vals) eq 'ARRAY' ? $vals : [ $vals ],
    115 };
    117 116 }
    118 117 }
    119 118