From b630f48c8c274c698836cf2af8dff5b153b986ac Mon Sep 17 00:00:00 2001
From: micha <micha@tpad.(none)>
Date: Mon, 16 Jan 2012 18:49:59 +0100
Subject: Cleanup tasks

---
 application.rb | 10 ++++++++++
 1 file changed, 10 insertions(+)

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
-- 
cgit v1.2.3