Index: openacs-4/packages/assessment-portlet/www/assessment-portlet.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment-portlet/www/assessment-portlet.tcl,v
diff -u -r1.8 -r1.9
--- openacs-4/packages/assessment-portlet/www/assessment-portlet.tcl 26 Apr 2005 17:25:42 -0000 1.8
+++ openacs-4/packages/assessment-portlet/www/assessment-portlet.tcl 17 Feb 2006 12:17:58 -0000 1.9
@@ -45,7 +45,6 @@
template::multirow create assessments assessment_id title description assessment_url community_url community_name
set old_comm_node_id 0
db_foreach open_asssessments {} {
- if {([empty_string_p $start_time] || $start_time <= $cur_time) && ([empty_string_p $end_time] || $end_time >= $cur_time)} {
if {$comm_node_id == $old_comm_node_id} {
set community_name ""
}
@@ -60,7 +59,6 @@
}
template::multirow append assessments $assessment_id $title $description $assessment_url $community_url $community_name
- }
}
@@ -70,8 +68,13 @@
[list \
label "[_ dotlrn.Community]" \
display_template {@sessions.community_name@ }]]
+ set package_id_sql ""
+} else {
+# set package_id_sql "and cf.package_id in ([join $list_of_package_ids ", "])"
+ set package_id_sql ""
}
+
lappend elements title \
[list \
label "[_ assessment.Assessments]"] \