|
Lines 151-157
sub get_tag_rows {
Link Here
|
| 151 |
next; |
151 |
next; |
| 152 |
} |
152 |
} |
| 153 |
unless (1 == scalar grep { $_ eq $key } @ok_fields) { |
153 |
unless (1 == scalar grep { $_ eq $key } @ok_fields) { |
| 154 |
carp "get_tag_rows received unreconized argument key '$key'."; |
154 |
carp "get_tag_rows received unrecognized argument key '$key'."; |
| 155 |
next; |
155 |
next; |
| 156 |
} |
156 |
} |
| 157 |
if ($key eq 'limit') { |
157 |
if ($key eq 'limit') { |
|
Lines 189-195
sub get_tags { # i.e., from tags_index
Link Here
|
| 189 |
next; |
189 |
next; |
| 190 |
} |
190 |
} |
| 191 |
unless (1 == scalar grep { $_ eq $key } @ok_fields) { |
191 |
unless (1 == scalar grep { $_ eq $key } @ok_fields) { |
| 192 |
carp "get_tags received unreconized argument key '$key'."; |
192 |
carp "get_tags received unrecognized argument key '$key'."; |
| 193 |
next; |
193 |
next; |
| 194 |
} |
194 |
} |
| 195 |
if ($key eq 'limit') { |
195 |
if ($key eq 'limit') { |
|
Lines 255-261
sub get_approval_rows { # i.e., from tags_approval
Link Here
|
| 255 |
next; |
255 |
next; |
| 256 |
} |
256 |
} |
| 257 |
unless (1 == scalar grep { $_ eq $key } @ok_fields) { |
257 |
unless (1 == scalar grep { $_ eq $key } @ok_fields) { |
| 258 |
carp "get_approval_rows received unreconized argument key '$key'."; |
258 |
carp "get_approval_rows received unrecognized argument key '$key'."; |
| 259 |
next; |
259 |
next; |
| 260 |
} |
260 |
} |
| 261 |
if ($key eq 'limit') { |
261 |
if ($key eq 'limit') { |