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.15 -r1.16
--- openacs-4/packages/assessment-portlet/www/assessment-portlet.tcl 26 Feb 2008 15:57:16 -0000 1.15
+++ openacs-4/packages/assessment-portlet/www/assessment-portlet.tcl 9 Nov 2008 23:29:22 -0000 1.16
@@ -21,22 +21,22 @@
set elements [list]
if {!$one_instance_p} {
set elements [list community_name \
- [list \
- label "[_ dotlrn.Community]" \
- display_template {@assessments.community_name@ }]]
+ [list \
+ label "[_ dotlrn.Community]" \
+ display_template {@assessments.community_name@ }]]
}
lappend elements title \
[list \
- label "[_ assessment.Title]" \
- display_template {@assessments.title@(#assessment.anonymous#)}]
+ label "[_ assessment.Title]" \
+ display_template {@assessments.title@
(#assessment.anonymous#)}]
lappend elements status {
label "[_ assessment.Status]"
- display_template {#assessment.Incomplete##assessment.Finished##assessment.Untaken#
(#assessment.anonymous#)}
+ display_template {#assessment.Incomplete##assessment.Finished##assessment.Untaken#}
}
lappend elements take {
- label ""
+ label "[_ acs-kernel.common_Actions]"
display_template {#assessment.Finish##assessment.Take##assessment.Retake#}
}
if {[llength $list_of_package_ids]==1} {
@@ -56,16 +56,16 @@
lappend elements session \
[list \
- label {} \
+ label "[_ assessment.Review]" \
display_template {[_ assessment.Review]}]
lappend elements admin {
- label ""
+ label "[_ acs-kernel.common_Administration]"
display_template {\#acs-kernel.common_Administration\#}
}
lappend elements results {
- label ""
+ label "[_ assessment.Results]"
display_template {\#assessment.Results\#}
}
@@ -75,7 +75,6 @@
-multirow assessments \
-key assessment_id \
-elements $elements \
- -main_class narrow \
-no_data "\#assessment.No_open_assessments\#"
# get the information of all open assessments
@@ -125,16 +124,16 @@
lappend elements session \
[list \
- label {} \
+ label "[_ assessment.Review]" \
display_template {[_ assessment.Review]}]
lappend elements admin {
- label ""
+ label "[_ acs-kernel.common_Administration]"
display_template {\#acs-kernel.common_Administration\#}
}
lappend elements results {
- label ""
+ label "[_ assessment.Results]"
display_template {\#assessment.Results\#}
}
@@ -144,7 +143,6 @@
-multirow sessions \
-key assessment_id \
-elements $elements \
- -main_class narrow \
-no_data "\#assessment.No_answered_assessments\#"
# get the information of all assessments store in the database