On Thu, 11 Dec 2003, D.Kreft did scribble:

Bug in my code...

>     sub referral_connection {
>       my ($host, $port) = @_;
>
>       my $ldap = Net::LDAP->new($host,
>                                 port => $port,
>                                 chase_referrals => undef); # turn off

Do this instead:

      sub referral_connection {
          my ($self, $host, $port) = @_;

          my $ldap = $self->new($host,
                                # ...etc....);


__END__

Dances With Perl
7-footer At Large                                                  <><
Intranet Technologies

"Paranoia is good" -- mbaxter

Reply via email to