Fix typo preventing multiple being passed to new

marschap · Sep 11, 2002 · 8d4ec2d · 8d4ec2d
1 parent 4353eb1
commit 8d4ec2d
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Net/LDAP.pm b/lib/Net/LDAP.pm
@@ -97,7 +97,7 @@ sub new {
   my $obj  = bless {}, $type;
 
   foreach my $h (ref($host) ? @$host : ($host)) {
-    if ($obj->_connect($host, $arg)) {
+    if ($obj->_connect($h, $arg)) {
       $obj->{net_ldap_host} = $h;
       last;
     }