[perl-ldap-checkins] CVS: ldap/lib/Net/LDAP FAQ.pod,1.29,1.30

[Chris R. <chr...@us...>]

Update of /cvsroot/perl-ldap/ldap/lib/Net/LDAP
In directory sc8-pr-cvs1:/tmp/cvs-serv28331/lib/Net/LDAP

Modified Files:
	FAQ.pod 
Log Message:
Use ->new for all constructor examples

Index: FAQ.pod
===================================================================
RCS file: /cvsroot/perl-ldap/ldap/lib/Net/LDAP/FAQ.pod,v
retrieving revision 1.29
retrieving revision 1.30
diff -u -d -r1.29 -r1.30
--- FAQ.pod	7 May 2003 11:03:13 -0000	1.29
+++ FAQ.pod	22 May 2003 12:32:13 -0000	1.30
@@ -988,7 +988,7 @@
   local $/ = undef;
   my $jpeg = <$filename>;
 
-  my $ldap = new Net::LDAP(...);
+  my $ldap = Net::LDAP->new(...);
   my $res = $ldap->bind(...);
      $res = $ldap->modify(...,
                    add => [ 'jpegPhoto' => [ $jpeg ] ]);
@@ -1014,7 +1014,7 @@
           local $/ = undef;
           my $jpeg = <$filename>;
 
-          my $ldap = new Net::LDAP(...);
+          my $ldap = Net::LDAP->new(...);
           my $res = $ldap->bind(...);
           $res = $ldap->modify(...,
                           add => [ 'jpegPhoto' => [ $jpeg ] ]);
@@ -1113,7 +1113,7 @@
   $ADS_RIGHT_EXCH_MAIL_SEND_AS |
   $ADS_RIGHT_EXCH_MODIFY_USER_ATT;
 
-  $exch = new Net::LDAP('server', debug =>0) || die $@;
+  $exch = Net::LDAP->new('server', debug =>0) || die $@;
 
   $exch->bind( 'cn=admin_user,cn=nt_domain,cn=admin', version =>3,
   password=>'password');