diff options
Diffstat (limited to 'lib/TUWF/Validate.pm')
-rw-r--r-- | lib/TUWF/Validate.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lib/TUWF/Validate.pm b/lib/TUWF/Validate.pm index 4c661a3..adeb1d6 100644 --- a/lib/TUWF/Validate.pm +++ b/lib/TUWF/Validate.pm @@ -167,6 +167,9 @@ sub _compile { sub compile { my($validations, $schema) = @_; + + return $schema if ref $schema eq __PACKAGE__; + my $c = _compile $validations, $schema, 64; $c->{schema}{type} //= 'scalar'; |