Commit 4131aff5 authored by Nigel Kukard's avatar Nigel Kukard
Browse files

Added additional debugging info

parent 81ead811
......@@ -1598,6 +1598,8 @@ sub _set
if (!defined($self->_relation($relationName)->set($relationPropertyName,$value))) {
return;
}
$self->_log(DATAOBJ_LOG_DEBUG,"Relation '%s' with property '%s' was set",$relationName,$relationPropertyName);
}
$self->_log(DATAOBJ_LOG_DEBUG,"Property '%s' set to %s",$property->{'name'},defined($value) ? "'$value'" : '-undef-');
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment