diff --git a/lib/WebGUI/User.pm b/lib/WebGUI/User.pm index b5d7cc1a1..fc789273d 100644 --- a/lib/WebGUI/User.pm +++ b/lib/WebGUI/User.pm @@ -188,7 +188,8 @@ Returns an instance of the authentication object for this user. =cut sub authInstance { - my $session = shift; + my $self = shift; + my $session = $self->session; my $authMethod; if ($self->isVisitor) { @@ -373,7 +374,7 @@ sub delete { if ($self->{_user}{"friendsGroup"} ne ""); # clean up any user workflows - my $instances = WebGUI::Workflow::Instance->getInstancesByObject($session, { + my $instances = WebGUI::Workflow::Instance->getInstancesForObject($session, { className => ref $self, methodName => 'new', parameters => $self->getId, diff --git a/lib/WebGUI/Workflow/Instance.pm b/lib/WebGUI/Workflow/Instance.pm index 4ada0c1be..27956d104 100644 --- a/lib/WebGUI/Workflow/Instance.pm +++ b/lib/WebGUI/Workflow/Instance.pm @@ -447,7 +447,7 @@ sub getInstancesForObject { SELECT instanceId FROM - workflowInstance + WorkflowInstance WHERE className = ? AND methodName = ?