Index: openacs-4/packages/tasks/www/task-interval.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/tasks/www/Attic/task-interval.tcl,v
diff -u -N
--- openacs-4/packages/tasks/www/task-interval.tcl	17 Nov 2005 16:04:39 -0000	1.4
+++ /dev/null	1 Jan 1970 00:00:00 -0000
@@ -1,70 +0,0 @@
-ad_page_contract {
-
-    Simple add/edit form for projects
-
-    @author jader@bread.com, ncarroll@ee.usyd.edu.au
-    @creation-date 2003-05-15
-    @cvs-id $Id: task-interval.tcl,v 1.4 2005/11/17 16:04:39 maltes Exp $
-
-    @return context_bar Context bar.
-    @return title Page title.
-
-} {
-    {party_id:integer,optional}
-    task_id:integer
-    status_id:integer,optional
-    orderby:optional
-    {return_url ""}
-    action
-    days:integer
-} -properties {
-}
-
-if { $days != "7" } {
-    set days 7
-}
-
-
-if { ![exists_and_not_null return_url] } {
-    set return_url [export_vars -base "contact" -url {party_id orderby status_id}]
-}
-if { $action == "minus" } {
-    set operand "-"
-} else {
-    set operand "+"
-}
-
-set package_id [ad_conn package_id]
-set title "Add/Edit"
-set context [list $title]
-
-db_1row get_task_info "
-    select t.title as task, t.description, t.mime_type, t.priority,
-           to_char((t.due_date $operand '$days days'::interval),'YYYY-MM-DD') as due_date,
-           t.status_id as status, t.comment, t.assignee_id
-      from t_tasks t
-     where t.task_id = :task_id
-    "
-
-set task_id [tasks::task::edit \
-		 -task_id ${task_id} \
-		 -title ${task} \
-		 -description ${description} \
-		 -mime_type $mime_type \
-		 -comment ${comment} \
-		 -due_date ${due_date} \
-		 -status_id ${status} \
-		 -assignee_id ${assignee_id} \
-		 -priority ${priority}]
-
-set task_url [export_vars -base "/tasks/task" -url {task_id party_id status_id orderby}]
-
-if { $action == "minus" } {
-    util_user_message -html -message "[_ tasks.task_moved_up]"
-} else {
-    util_user_message -html -message "[_ tasks.task_delayed]"
-}
-
-
-ad_returnredirect $return_url
-ad_script_abort