From 873c07ac73fff1a16f078b68e107b2e4ae39e5c9 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Sun, 11 Apr 2010 19:56:32 -0700
Subject: [PATCH] Must return the state of the call to super() in
 Subscribable's purge.

---
 lib/WebGUI/Role/Asset/Subscribable.pm | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/lib/WebGUI/Role/Asset/Subscribable.pm b/lib/WebGUI/Role/Asset/Subscribable.pm
index e40e72488..af72489aa 100644
--- a/lib/WebGUI/Role/Asset/Subscribable.pm
+++ b/lib/WebGUI/Role/Asset/Subscribable.pm
@@ -433,9 +433,8 @@ override purge => sub {
 
     my $group   = $self->getSubscriptionGroup();
     $group->delete if $group;
-    super();
 
-    return;
+    return super();
 };
 
 #----------------------------------------------------------------------------