diff options
author | Eugeniy Mikhailov <evgmik@gmail.com> | 2011-03-07 00:39:56 -0500 |
---|---|---|
committer | Eugeniy Mikhailov <evgmik@gmail.com> | 2011-03-07 00:39:56 -0500 |
commit | 861fb941e0fa8e4785c1a612378aede5a5921030 (patch) | |
tree | 9ee2cd9e8e680d20f23c928ec1a6b1d1c0dcd05f /GradeBook_lib.tcl | |
parent | 50e8c16662d684b9368462ffaa1a756ccbe9a43f (diff) | |
download | GradeBook-861fb941e0fa8e4785c1a612378aede5a5921030.tar.gz GradeBook-861fb941e0fa8e4785c1a612378aede5a5921030.zip |
weighted column get their own list of actions
Ignore-this: 68210bfb2023453c61f457d26f6d671
darcs-hash:20110307053956-067c0-187ece9ceac43599d26e08f53839d97b88885ac6.gz
Diffstat (limited to 'GradeBook_lib.tcl')
-rwxr-xr-x | GradeBook_lib.tcl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/GradeBook_lib.tcl b/GradeBook_lib.tcl index fcfb657..4927776 100755 --- a/GradeBook_lib.tcl +++ b/GradeBook_lib.tcl @@ -414,7 +414,11 @@ proc htmlDBout {db permission_list user {sort_col {}}} { GroupName { } SectionNum { } default { - lappend action_list changegrades "change grades" deletecolumn delete changecolumn "change column" + if { $category eq "weighted_column" } { + # modify actions for weighted_column + } else { + lappend action_list changegrades "change grades" deletecolumn delete changecolumn "change column" + } } } set separator {<br>} |