From f5be6be6a52ee4461243eeaadcf769c14571b82f Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Tue, 19 Nov 2002 20:56:12 +0000
Subject: [PATCH] ldap export update

---
 FS/FS/part_export/ldap.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/FS/FS/part_export/ldap.pm b/FS/FS/part_export/ldap.pm
index ec1d37fd5..6077b7418 100644
--- a/FS/FS/part_export/ldap.pm
+++ b/FS/FS/part_export/ldap.pm
@@ -229,7 +229,7 @@ sub ldap_connect {
   eval "use Net::LDAP";
   die $@ if $@;
 
-  my $ldap = Net::LDAP->net($machine) or die $@;
+  my $ldap = Net::LDAP->new($machine) or die $@;
   my $status = $ldap->bind( $dn, password=>$password );
   die $status->error if $status->is_error;
 
-- 
2.11.0