Index: openacs-4/contrib/packages/project-manager/www/task-one.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/task-one.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/contrib/packages/project-manager/www/task-one.tcl 4 Aug 2003 21:24:06 -0000 1.4 +++ openacs-4/contrib/packages/project-manager/www/task-one.tcl 4 Aug 2003 22:40:21 -0000 1.5 @@ -10,9 +10,8 @@ @param context_bar value for context bar creation @property task_title Name for Task } { - task_id:integer - project_item_id:integer - project_id:integer + task_id:integer,optional + task_revision_id:integer,optional } -properties { context_bar:onevalue @@ -24,12 +23,21 @@ write_p:onevalue create_p:onevalue versions:multirow +} -validate { + task_id_exists { + if {![info exists task_id]} { + set task_id [db_string get_task_id { }] + } + } } + # --------------------------------------------------------------- # -set context_bar [ad_context_bar "one?item_id=$project_item_id&project_id=$project_id Project" "View"] +db_1row get_project_ids { } +set context_bar [ad_context_bar "one?item_id=$project_item_id Project" "View"] + # the unique identifier for this package set package_id [ad_conn package_id] set user_id [ad_maybe_redirect_for_registration]