the data which is expected to be HASH is validated. but the validation
method doesn't return immediately when there is validation errors in
data. so, validation method dies because of it.
Validation method must return immediately if data isn't hash when data
must be hash.
I made a patch for this problem. Could you apply it?
--- Kwalify.pm.orig>....2009-07-29 08:41:55.000000000 +0900
+++ Kwalify.pm>.2009-07-29 08:42:57.000000000 +0900
@@ -318,7 +318,8 @@
Show quoted text
>......return;
}
if (!UNIVERSAL::isa($data, 'HASH')) {
->......$self->_error("Non-valid data " . $data . ", expected mapping");
+>......$self->_error("Non-valid data " . $data . ", expected mapping.
Hash is expected.");
+ return;
}
return if
($self->{done}{overload::StrVal($data)}{overload::StrVal($schema)});