Index: openacs-4/packages/project-manager/lib/tasks-portlet.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/project-manager/lib/tasks-portlet.adp,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/project-manager/lib/tasks-portlet.adp 26 Aug 2005 20:59:12 -0000 1.6
+++ openacs-4/packages/project-manager/lib/tasks-portlet.adp 14 Sep 2005 18:59:21 -0000 1.7
@@ -9,7 +9,8 @@
-
+
|
Index: openacs-4/packages/project-manager/lib/tasks-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/project-manager/lib/tasks-portlet.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/project-manager/lib/tasks-portlet.tcl 26 Aug 2005 20:59:12 -0000 1.2
+++ openacs-4/packages/project-manager/lib/tasks-portlet.tcl 14 Sep 2005 18:59:21 -0000 1.3
@@ -59,4 +59,6 @@
set processes_html [pm::process::select_html]
-
+if {![info exists instance_id]} {
+ set instance_id 0
+}
Index: openacs-4/packages/project-manager/lib/tasks.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/project-manager/lib/tasks.tcl,v
diff -u -r1.19 -r1.20
--- openacs-4/packages/project-manager/lib/tasks.tcl 13 Sep 2005 20:56:43 -0000 1.19
+++ openacs-4/packages/project-manager/lib/tasks.tcl 14 Sep 2005 18:59:21 -0000 1.20
@@ -1,11 +1,14 @@
# Possible
# party_id
# role_id
-
set required_param_list [list]
set optional_param_list [list orderby searchterm status_id page bulk_p actions_p base_url watcher_p page_num]
-set optional_unset_list [list party_id role_id project_item_id instance_id is_observer_p]
+set optional_unset_list [list party_id role_id project_item_id is_observer_p]
+if {$instance_id == 0} {
+ unset instance_id
+}
+
set use_bulk_p [parameter::get -parameter "UseBulkP" -default "0"]
foreach required_param $required_param_list {
@@ -165,7 +168,7 @@
where_clause "t.parent_id = :project_item_id"
] \
instance_id [list \
- where_clause "p.object_package_id = :instance_id"
+ where_clause "ti.process_instance = :instance_id"
] \
is_observer_p [list \
label "[_ project-manager.Observer]" \