DataObjects/Core_notify_blacklist.php

diff --git a/DataObjects/Core_notify_blacklist.php b/DataObjects/Core_notify_blacklist.php
index 58276f1..84437d7 100644 (file)
--- a/DataObjects/Core_notify_blacklist.php
+++ b/DataObjects/Core_notify_blacklist.php
@@ -36,4 +36,13 @@ class Pman_Core_DataObjects_Core_notify_blacklist extends DB_DataObject
         return false;
     }
     
+    // delete blacklists older than 1 week (and try again)
+    function prune()
+    {
+        $this->query("
+            DELETE FROM {$this->tableName()} where added_dt < NOW()  - 1 WEEK
+        ");
+            
+    }
+    
 }
\ No newline at end of file