diff options
| author | Eugeniy Mikhailov <evgmik@gmail.com> | 2011-01-20 22:00:52 -0500 |
|---|---|---|
| committer | Eugeniy Mikhailov <evgmik@gmail.com> | 2011-01-20 22:00:52 -0500 |
| commit | 21517074da16dbcce2c5eca5c31f27be289f483e (patch) | |
| tree | f3c8197e14090436807a43ed55aef097d13a6d30 /GradeBook.tcl | |
| parent | 3b6b6f6c426d78ed7a1eb5ccbe5561005bb7f016 (diff) | |
| download | GradeBook-21517074da16dbcce2c5eca5c31f27be289f483e.tar.gz GradeBook-21517074da16dbcce2c5eca5c31f27be289f483e.zip | |
Acces table modified
Ignore-this: b373b8cb6b9400a5d20becea5768edf0
darcs-hash:20110121030052-067c0-7036b402c2896cef56aa149c1bd1140fe844972d.gz
Diffstat (limited to 'GradeBook.tcl')
| -rwxr-xr-x | GradeBook.tcl | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/GradeBook.tcl b/GradeBook.tcl index 0cffbc2..d5075a0 100755 --- a/GradeBook.tcl +++ b/GradeBook.tcl @@ -83,13 +83,15 @@ proc CreateAccessRightsTable {db} { db eval {INSERT INTO AccessRightsTable VALUES('addcolumnrequest', 1, 1, 0, 0)} db eval {INSERT INTO AccessRightsTable VALUES('addcolumn', 1, 1, 0, 0)} db eval {INSERT INTO AccessRightsTable VALUES('deletecolumn', 1, 1, 0, 0)} - db eval {INSERT INTO AccessRightsTable VALUES('renamecolumn', 1, 1, 0, 0)} db eval {INSERT INTO AccessRightsTable VALUES('showcontrols', 1, 1, 1, 0)} db eval {INSERT INTO AccessRightsTable VALUES('changegrades', 1, 1, 0, 0)} db eval {INSERT INTO AccessRightsTable VALUES('updategrades', 1, 1, 0, 0)} db eval {INSERT INTO AccessRightsTable VALUES('changecolumn', 1, 1, 0, 0)} db eval {INSERT INTO AccessRightsTable VALUES('updatecolumn', 1, 1, 0, 0)} db eval {INSERT INTO AccessRightsTable VALUES('logoff', 1, 1, 1, 0)} + db eval {INSERT INTO AccessRightsTable VALUES('changefirstname', 1, 0, 0, 0)} + db eval {INSERT INTO AccessRightsTable VALUES('changelastname', 1, 0, 0, 0)} + db eval {INSERT INTO AccessRightsTable VALUES('changeusername', 1, 0, 0, 0)} } proc htmlErrorMsg { msg } { |