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') { |