diff options
| -rwxr-xr-x | GradeBook.tcl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/GradeBook.tcl b/GradeBook.tcl index 6c264cc..1257cab 100755 --- a/GradeBook.tcl +++ b/GradeBook.tcl @@ -182,13 +182,13 @@ proc htmlDBout {db permission_list user {sort_col {}}} { foreach col $v(*) { puts -nonewline "<th><a href=\"$script_name?action=sort&sortCol=$col\">$col</a>" # below list has action and action_label pairs - set action_list {} + set action_list {userhidecolumn hide} switch $col { FirstName { lappend action_list changefirstname "change first name" } LastName { lappend action_list changelastname "change last name" } UserName { lappend action_list changeusername "change user name" } - PasswordHash { set action_list {} } - GroupName { set action_list {} } + PasswordHash { } + GroupName { } default { lappend action_list changegrades "change grades" deletecolumn delete changecolumn "change column" } |