Cleanup tasks

1 files changed, 10 insertions, 0 deletions

diff --git a/application.rb b/application.rb
index 1c0303e..76c2b8c 100644
--- a/application.rb
+++ b/application.rb
@@ -179,6 +179,16 @@ post '/?' do
   task.uri + "\n"
 end
 
+# Clean tasks. Delete every completed task older than 30 days
+delete '/cleanup' do
+  tasklist = Task.all
+  tasklist.each do |task|
+    if task.metadata[OT.hasStatus] == 'Completed'
+      task.delete if Time.now - Time.parse(task.created_at) > 2592000
+    end
+  end
+end
+
 # Change task status. Possible URIs are: `
 # - /task/Cancelled
 # - /task/Completed: requires taskURI argument