|
Lines 39-45
foreach my $route ( keys %{$paths} ) {
Link Here
|
| 39 |
&& $parameter->{schema}->{type} eq 'object' ) { |
39 |
&& $parameter->{schema}->{type} eq 'object' ) { |
| 40 |
|
40 |
|
| 41 |
# it is an object type definition |
41 |
# it is an object type definition |
| 42 |
if ( not exists $parameter->{schema}->{additionalProperties} ) { |
42 |
if ( $parameter->{name} ne 'query' # our query parameter is under-specified |
|
|
43 |
and not exists $parameter->{schema}->{additionalProperties} ) { |
| 43 |
push @missing_additionalProperties, |
44 |
push @missing_additionalProperties, |
| 44 |
{ type => 'parameter', |
45 |
{ type => 'parameter', |
| 45 |
route => $route, |
46 |
route => $route, |
| 46 |
- |
|
|