avoid warning when list_param is undefined

This commit is contained in:
Dietmar Maurer 2011-10-14 08:56:55 +02:00
parent 1d21344cf5
commit aab47b58d4

View File

@ -860,7 +860,7 @@ sub get_options {
my @getopt = ();
foreach my $prop (keys %{$schema->{properties}}) {
my $pd = $schema->{properties}->{$prop};
next if $prop eq $list_param;
next if $list_param && $prop eq $list_param;
next if defined($uri_param->{$prop});
if ($prop eq 'password' && $pwcallback) {