my ( $c, $email, $name, $nick, $ts, $sig, $options ) = @_;
unless ( @_ == 6 || ( @_ == 7 && ref($options) eq 'HASH' ) ) {
- Carp::croak('usage: $c->authenticate_ldap( $email, $name, $nick, $ts, $sig [, \%options ] )');
+ Carp::croak('usage: $c->authenticate_typekey( $email, $name, $nick, $ts, $sig [, \%options ] )');
}
unless ( @_ == 7 ) {