aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xGradeBook_lib.tcl3
1 files changed, 3 insertions, 0 deletions
diff --git a/GradeBook_lib.tcl b/GradeBook_lib.tcl
index 842a8dd..1ab3612 100755
--- a/GradeBook_lib.tcl
+++ b/GradeBook_lib.tcl
@@ -1518,12 +1518,15 @@ proc htmlDBout {db permission_list user {sort_col {}}} {
set grades_category [ get_grades_category ]
set defSortCol LastName
+ # cookies stores columns with spaces surrounding in {}
+ set sort_col [join $sort_col]
# testing for the existence of the sorting column
if { ![doesColumnExists $sort_col GradesTable] } {
dbg "changing to default sorting column $defSortCol" msg_level_info
set sort_col $defSortCol
}
+
puts {<div class="gradestable">}
set show_header 1
# get names of all columns