Commit 25ab9bb7 authored by Nigel Kukard's avatar Nigel Kukard

Output debugging before class is actually created

parent b5c4733e
......@@ -152,6 +152,8 @@ sub _relationChild
if (!defined($self->{'_child'})) {
# Grab child class name
my $childClassName = $self->_relationChildClass();
# Use child logging method...
$self->_relationParentObject()->_log(DATAOBJ_LOG_DEBUG,"Spawning '$childClassName' to satisfy relation requirement");
# Instantiate child class
my $child;
eval "
......@@ -161,8 +163,6 @@ sub _relationChild
die $@ if $@;
# Assign instantiated child class
$self->{'_child'} = $child;
# Use child logging method...
$child->_log(DATAOBJ_LOG_DEBUG,"Spawned '$childClassName' to satisfy relation requirement");
}
# Return the child we have or have created
......
Markdown is supported
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