diff options
| author | Eugeniy Mikhailov <evgmik@gmail.com> | 2011-01-23 21:46:38 -0500 |
|---|---|---|
| committer | Eugeniy Mikhailov <evgmik@gmail.com> | 2011-01-23 21:46:38 -0500 |
| commit | 994f5a336e963bc91722afd622b2d3b4a3487654 (patch) | |
| tree | e206b7c99ebecb819501831056776d63edb85d54 /CreateCourseGradeBook.tcl | |
| parent | cd3373da3288f7a43f00d459b731bc2d02b637b5 (diff) | |
| download | GradeBook-994f5a336e963bc91722afd622b2d3b4a3487654.tar.gz GradeBook-994f5a336e963bc91722afd622b2d3b4a3487654.zip | |
added reasonable defaulr UserHiddenColums for instructor in CreateCourseGradeBook
Ignore-this: 5a36555ead1d60626f5467f46e059a8c
darcs-hash:20110124024638-067c0-e71a252da444f8e1434be1dbcad30a604032a8eb.gz
Diffstat (limited to 'CreateCourseGradeBook.tcl')
| -rwxr-xr-x | CreateCourseGradeBook.tcl | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/CreateCourseGradeBook.tcl b/CreateCourseGradeBook.tcl index 39b1e71..bccc2f5 100755 --- a/CreateCourseGradeBook.tcl +++ b/CreateCourseGradeBook.tcl @@ -136,5 +136,8 @@ CreateAccessRightsTable db #AddUserNonWeb first_name last_name user_name password_hash group_name id_number section_num i AddUserNonWeb $instructor_fname $instructor_lname $instructor_login [::md5::md5 -hex $instructor_password] instructor +# reasonable defaults for hidden columns +set instructor_hidden_columns [list UserHiddenColums PasswordHash UserHiddenGroups IdNum] +UpdateColValue4GroupNameNonWeb UserHiddenColums instructor $instructor_hidden_columns # vim: ts=2 sw=2 foldmethod=indent: |