From 929d867373030b3e094be4d734e31d75cb05611e Mon Sep 17 00:00:00 2001 From: Colin Kuskie Date: Thu, 28 Jan 2010 13:06:21 -0800 Subject: [PATCH] Fix GetCsMail workflow activity. --- lib/WebGUI/Workflow/Activity/GetCsMail.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/WebGUI/Workflow/Activity/GetCsMail.pm b/lib/WebGUI/Workflow/Activity/GetCsMail.pm index b648863e2..0c24644f1 100644 --- a/lib/WebGUI/Workflow/Activity/GetCsMail.pm +++ b/lib/WebGUI/Workflow/Activity/GetCsMail.pm @@ -204,8 +204,8 @@ sub execute { my $post = undef; if ($message->{inReplyTo} && $message->{inReplyTo} =~ m/cs\-([\w_-]{22})\@/) { my $id = $1; - my $repliedPost = WebGUI::Asset->newById($self->session, $id); - if ($repliedPost + my $repliedPost = eval { WebGUI::Asset->newById($self->session, $id); }; + if (! Exception::Class->caught() && $repliedPost->isa('WebGUI::Asset::Post') && $repliedPost->getThread->getParent->getId eq $cs->getId) { $post = $repliedPost;