summaryrefslogtreecommitdiff
path: root/CreateCourseGradeBook.tcl
diff options
context:
space:
mode:
authorEugeniy Mikhailov <evgmik@gmail.com>2011-01-23 21:46:38 -0500
committerEugeniy Mikhailov <evgmik@gmail.com>2011-01-23 21:46:38 -0500
commit994f5a336e963bc91722afd622b2d3b4a3487654 (patch)
treee206b7c99ebecb819501831056776d63edb85d54 /CreateCourseGradeBook.tcl
parentcd3373da3288f7a43f00d459b731bc2d02b637b5 (diff)
downloadGradeBook-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-xCreateCourseGradeBook.tcl3
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: