on deleting a notice

diff --git a/EVENTS.txt b/EVENTS.txt
index bc3e0ea90fba33ae25220011442dca02024e4a0d..1a3b2594a2efe55ef5be80810e1321c76385ee99 100644 (file)
--- a/EVENTS.txt
+++ b/EVENTS.txt
@@ -1064,3 +1064,5 @@ EndRssEntryArray: at the end of copying a notice to an array
 - $notice: the notice being copied
 - &$entry: the entry, with all the fields filled up
 
+NoticeDeleteRelated: at the beginning of deleting related fields to a notice
+- $notice: notice being deleted

diff --git a/classes/Notice.php b/classes/Notice.php
index 0eeebfadf374aa7e61c89ca7f56f524f77b15bcb..686dfc031eabbcfdcf60492d180009358b4049d0 100644 (file)
--- a/classes/Notice.php
+++ b/classes/Notice.php
@@ -121,16 +121,19 @@ class Notice extends Memcached_DataObject
             $deleted->insert();
         }
 
-        // Clear related records
+        if (Event::handle('NoticeDeleteRelated', array($this))) {
 
-        $this->clearReplies();
-        $this->clearRepeats();
-        $this->clearFaves();
-        $this->clearTags();
-        $this->clearGroupInboxes();
+            // Clear related records
 
-        // NOTE: we don't clear inboxes
-        // NOTE: we don't clear queue items
+            $this->clearReplies();
+            $this->clearRepeats();
+            $this->clearFaves();
+            $this->clearTags();
+            $this->clearGroupInboxes();
+
+            // NOTE: we don't clear inboxes
+            // NOTE: we don't clear queue items
+        }
 
         $result = parent::delete();