aboutsummaryrefslogtreecommitdiff
path: root/GradeBook_lib.tcl
diff options
context:
space:
mode:
authorEugeniy Mikhailov <evgmik@gmail.com>2013-12-08 20:29:40 -0500
committerEugeniy Mikhailov <evgmik@gmail.com>2013-12-08 20:29:40 -0500
commitd3a78ae4eb5973aed6cca6d06b3be741f5438305 (patch)
treeafd21a37da37793acca3833e95a0c855a648a5d0 /GradeBook_lib.tcl
parent9655899f923d0c70809b8952d5d99e7599a525fb (diff)
downloadGradeBook-d3a78ae4eb5973aed6cca6d06b3be741f5438305.tar.gz
GradeBook-d3a78ae4eb5973aed6cca6d06b3be741f5438305.zip
EditGradesCategories takes care of NumberToDrop column
Diffstat (limited to 'GradeBook_lib.tcl')
-rwxr-xr-xGradeBook_lib.tcl5
1 files changed, 4 insertions, 1 deletions
diff --git a/GradeBook_lib.tcl b/GradeBook_lib.tcl
index 829d6b5..53e904d 100755
--- a/GradeBook_lib.tcl
+++ b/GradeBook_lib.tcl
@@ -622,7 +622,7 @@ proc UpdateGradesCategores { db permission_list user } {
proc EditGradesCategories { db permission_list user } {
global script_name
- lappend column_list CategoryName CategoryWeight NeedsTotal
+ lappend column_list CategoryName CategoryWeight NumberToDrop NeedsTotal
set sql_column_list [join $column_list ","]
puts {<div class="change_categories">}
puts {<div class="categories_table">}
@@ -657,6 +657,9 @@ proc EditGradesCategories { db permission_list user } {
}
puts "<th><input type=\"checkbox\" name=\"$v(CategoryName)_needs_total\" value=\"\" $checkbox_flag></th>"
}
+ "NumberToDrop" {
+ puts "<td><input type=\"text\" name=\"$v(CategoryName)_NumberToDrop\" value=\"$v(NumberToDrop)\" size=5></td>"
+ }
default {
puts -nonewline "<td>$v($index)</td>"
}