Commit 027a5881 authored by Xavier Guimard's avatar Xavier Guimard

Regexp opt conflict

parent 09610184
...@@ -218,7 +218,7 @@ sub load { ...@@ -218,7 +218,7 @@ sub load {
my $entry = $search->shift_entry(); my $entry = $search->shift_entry();
my @confValues = $entry->get_value( $self->{ldapAttributeContent} ); my @confValues = $entry->get_value( $self->{ldapAttributeContent} );
foreach (@confValues) { foreach (@confValues) {
my ( $k, $v ) = ( $_ =~ /\{(.*?)\}(.*)/sm ); my ( $k, $v ) = ( $_ =~ /\{(.*?)\}(.*)/s );
if ($fields) { if ($fields) {
$f->{$k} = $v if ( grep { $_ eq $k } @$fields ); $f->{$k} = $v if ( grep { $_ eq $k } @$fields );
} }
......
Markdown is supported
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