diff --git a/lib/WebGUI/Workflow/Activity/ArchiveOldThreads.pm b/lib/WebGUI/Workflow/Activity/ArchiveOldThreads.pm
index 5c23ca5fa..4e64a0d31 100644
--- a/lib/WebGUI/Workflow/Activity/ArchiveOldThreads.pm
+++ b/lib/WebGUI/Workflow/Activity/ArchiveOldThreads.pm
@@ -90,7 +90,7 @@ sub execute {
         my $b = $session->db->read($sql,[$archiveDate, $cs->lineage.'%']);
         THREAD: while (my ($id, $version) = $b->array) {
             my $thread = eval { WebGUI::Asset->newById($session, $id, $version); };
-            if (WebGUI::Exception->caught()) {
+            if (Exception::Class->caught()) {
                 $session->log->error("Unable to instanciate Thread: $@");
                 next THREAD;
             }