aboutsummaryrefslogtreecommitdiff
path: root/GradeBook_lib.tcl
diff options
context:
space:
mode:
authorEugeniy E. Mikhailov <evgmik@gmail.com>2020-02-14 14:12:35 -0500
committerEugeniy E. Mikhailov <evgmik@gmail.com>2020-02-14 14:12:35 -0500
commitc01418efda7923c3af65c7f70c5b8edb5d89fb5e (patch)
tree35524bd9d2d6c1f511653ac714e91fec34e85f7c /GradeBook_lib.tcl
parent3af941039b0724e1b7ac9a6ccc1f5ac7ad8ae587 (diff)
downloadGradeBook-c01418efda7923c3af65c7f70c5b8edb5d89fb5e.tar.gz
GradeBook-c01418efda7923c3af65c7f70c5b8edb5d89fb5e.zip
Info and Note categories are sorted alphabetically
Diffstat (limited to 'GradeBook_lib.tcl')
-rwxr-xr-xGradeBook_lib.tcl2
1 files changed, 1 insertions, 1 deletions
diff --git a/GradeBook_lib.tcl b/GradeBook_lib.tcl
index 9a8824e..387e04c 100755
--- a/GradeBook_lib.tcl
+++ b/GradeBook_lib.tcl
@@ -1571,7 +1571,7 @@ proc htmlDBout {db permission_list user {sort_col {}}} {
}
if { $sql_column_str ne "" } {
# assign type cast for different sort_col
- if { [SelectColValue4User $sort_col _Col_Category_] in [concat $grades_category weighted_column]} {
+ if { ([SelectColValue4User $sort_col _Col_Category_] in [concat $grades_category weighted_column]) && ([SelectColValue4User $sort_col _Col_Category_] ni [concat Note Info])} {
set ordered_by_str [concat CAST(\"$sort_col\" AS REAL)]
} else {
set ordered_by_str \"$sort_col\"