diff options
-rwxr-xr-x | GradeBook.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/GradeBook.tcl b/GradeBook.tcl index ac3024f..2aedf03 100755 --- a/GradeBook.tcl +++ b/GradeBook.tcl @@ -156,8 +156,8 @@ proc htmlDBout {db permission_list user {sort_col {}}} { # set hidden column list switch $permission(GroupName) { instructor { set hidden_columns {} } - ta { set hidden_columns [list UserName PasswordHash GroupName] } - student { set hidden_columns [list FirstName LastName UserName PasswordHash GroupName] } + ta { set hidden_columns [list UserName PasswordHash GroupName UserHiddenColums] } + student { set hidden_columns [list FirstName LastName UserName PasswordHash GroupName UserHiddenColums] } guest { set hidden_columns $column_list } default { set hidden_columns $column_list } } |