Index: openacs-4/packages/evaluation/www/admin/grades/distribution-edit.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/evaluation/www/admin/grades/distribution-edit.tcl,v diff -u -r1.9 -r1.10 --- openacs-4/packages/evaluation/www/admin/grades/distribution-edit.tcl 22 Dec 2004 22:06:40 -0000 1.9 +++ openacs-4/packages/evaluation/www/admin/grades/distribution-edit.tcl 8 Aug 2006 21:26:42 -0000 1.10 @@ -6,37 +6,70 @@ @author jopez@galileo.edu @creation-date Mar 2004 @cvs-id $Id$ + } { grade_id:integer,notnull + {set_task_id_live:optional ""} } set user_id [ad_conn user_id] +set simple_p [parameter::get -parameter "SimpleVersion"] set page_title "[_ evaluation.lt_Assignment_Types_Dist]" set context [list [list "grades" "[_ evaluation.Assignment_Types_]"] "[_ evaluation.lt_Assignment_Types_Dist]"] +set class "list" +if { $simple_p } { + set class "pbs_list" +} db_1row grade_info { *SQL* } +if { ![empty_string_p $set_task_id_live] } { + evaluation::set_live_task -task_item_id $set_task_id_live +} + +ns_log notice "el grade es $grade_item_id !!" set elements [list task_name \ - [list label "[_ evaluation.Name_]" \ + [list label "[_ evaluation.name]" \ + display_template {@grades.task_name@}\ orderby_asc {task_name asc} \ orderby_desc {task_name desc}] \ task_weight \ - [list label "[_ evaluation.lt_Weight_over_grade_wei]" \ - display_template { % } \ + [list label "[_ evaluation.lt_Weight_over_grade]" \ + display_template {