diff options
| -rwxr-xr-x | GradeBook.tcl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/GradeBook.tcl b/GradeBook.tcl index fa09ef0..85aa716 100755 --- a/GradeBook.tcl +++ b/GradeBook.tcl @@ -328,7 +328,7 @@ proc ChangeGrades { permission_list user } { set sql_column_list [join $column_list ","] puts "<form name=\"input\" action=\"$script_name\" method=\"post\" />" # output only selected columns - set eval_str "SELECT $sql_column_list FROM GradesTable ORDER BY LastName" + set eval_str "SELECT $sql_column_list FROM GradesTable WHERE UserName<>'_Col_Category_' AND UserName<>'_Max_Points_' ORDER BY LastName" set show_header 1 set err [catch { db eval $eval_str v { |