diff options
| author | Eugeniy Mikhailov <evgmik@gmail.com> | 2011-01-20 23:40:24 -0500 |
|---|---|---|
| committer | Eugeniy Mikhailov <evgmik@gmail.com> | 2011-01-20 23:40:24 -0500 |
| commit | 673ba00001d4d6e9f894de94be65d48844d75e87 (patch) | |
| tree | 9617c5bb3714868687e7d45e67eb2d01c343a72d /GradeBook.tcl | |
| parent | a40812b02c292bccd788a57bbd20625d1ef76ba6 (diff) | |
| download | GradeBook-673ba00001d4d6e9f894de94be65d48844d75e87.tar.gz GradeBook-673ba00001d4d6e9f894de94be65d48844d75e87.zip | |
added instructor an ta dummy users
Ignore-this: 3656993ded8a881be5cfbd5c72fcf72
darcs-hash:20110121044024-067c0-dd5e3f6e5bc5c2135da5ba03980cfe151ab7777a.gz
Diffstat (limited to 'GradeBook.tcl')
| -rwxr-xr-x | GradeBook.tcl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/GradeBook.tcl b/GradeBook.tcl index 3364cfb..07d9154 100755 --- a/GradeBook.tcl +++ b/GradeBook.tcl @@ -80,6 +80,8 @@ proc CreateGradesTable {db} { AddUserNonWeb {} {} _Max_Points_ {} inforow # dummy users + AddUserNonWeb Ins "Instruch I" instructor [::md5::md5 -hex qwerty] instructor + AddUserNonWeb Ta "Taevich, I" ta [::md5::md5 -hex qwerty] instructor AddUserNonWeb Dan "Dandanovich" dan [::md5::md5 -hex qwerty] student AddUserNonWeb Ale "Alevna" ale [::md5::md5 -hex qwerty] student AddUserNonWeb Jon "Jonovich" jon [::md5::md5 -hex qwerty] student |