my $args = $action->attributes->{$name}->[0];
if (defined($args) and not (
Scalar::Util::looks_like_number($args) and
- int($args) == $args
+ int($args) == $args and $args >= 0
)) {
require Data::Dumper;
local $Data::Dumper::Terse = 1;
if (exists $action->attributes->{Args} and exists $action->attributes->{CaptureArgs}) {
Catalyst::Exception->throw(
- "Combining Args and CaptureArgs not allowed registering " . $action->reverse()
+ "Combining Args and CaptureArgs attributes not supported registering " .
+ $action->reverse()
);
}