diff options
author | Eugeniy Mikhailov <evgmik@gmail.com> | 2013-12-08 20:29:40 -0500 |
---|---|---|
committer | Eugeniy Mikhailov <evgmik@gmail.com> | 2013-12-08 20:29:40 -0500 |
commit | d3a78ae4eb5973aed6cca6d06b3be741f5438305 (patch) | |
tree | afd21a37da37793acca3833e95a0c855a648a5d0 | |
parent | 9655899f923d0c70809b8952d5d99e7599a525fb (diff) | |
download | GradeBook-d3a78ae4eb5973aed6cca6d06b3be741f5438305.tar.gz GradeBook-d3a78ae4eb5973aed6cca6d06b3be741f5438305.zip |
EditGradesCategories takes care of NumberToDrop column
-rwxr-xr-x | GradeBook_lib.tcl | 5 |
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>" } |