| Subject: | getAllNicknames() always fail in v1.1.6 |
| Date: | Thu, 22 Oct 2009 15:43:42 +0200 |
| To: | bug-REST-Google-Apps-Provisioning [...] rt.cpan.org |
| From: | Zrajm C Akfohg <zrajm [...] klingonska.org> |
Calling getAllNicknames() always gives the error message "Missing
required 'nickname' argument".
Looking into the code, the problem is obvious. getAllNicknames() is
defined as follows:
sub getAllNicknames { return shift->getNickname(); }
And getNickname() in turn checks to make sure that it's given at least
one "nickname" argument, croaking otherwise.
If I comment out this check, getAllNicknames() gives a warning,
returns all nicknames, as expected.
# foreach my $param ( qw/ nickname / ) {
# $arg->{$param} || croak( "Missing required '$param' argument"
);
# }
/zrajm