From 5b5858055aa8cf3d7762a2ef775ea0052383fb87 Mon Sep 17 00:00:00 2001 From: Drake Date: Wed, 11 Oct 2006 19:00:50 +0000 Subject: [PATCH] Missed a few lines. D'oh. --- lib/WebGUI/LDAPLink.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/WebGUI/LDAPLink.pm b/lib/WebGUI/LDAPLink.pm index be3b747ba..a4e722cb1 100644 --- a/lib/WebGUI/LDAPLink.pm +++ b/lib/WebGUI/LDAPLink.pm @@ -275,7 +275,7 @@ sub recurseProperty { $recurseFilter =~ tr/\r//d; $recurseFilter =~ s/\A\n*//; $recurseFilter =~ s/\n*\z//; $recurseFilter = (join '|', map{quotemeta} grep{/\S/} split /\n/, $recurseFilter); - $recurseFilter = length($recurseFilter)? qr/$recurseFilter/ : undef; + $recurseFilter = length($recurseFilter)? qr/(?i:$recurseFilter)/ : undef; } #Prevent infinite recursion @@ -302,7 +302,7 @@ sub recurseProperty { $properties = $entry->get_value($recProperty,asref => 1); } foreach my $prop (@{$properties}) { - next if $recurseFilter and $prop =~ m/$recurseFilter/i; + next if $recurseFilter and $prop =~ m/$recurseFilter/; $self->recurseProperty($prop,$array,$property,$recProperty,$count,$recurseFilter,1); } }