logon is allowed to everyone

Ignore-this: 34c7eb9a105e3474978af3c7e48aea3f

darcs-hash:20110120031939-067c0-949de483c5a9066d58b439da281525d124f10151.gz

1 files changed, 1 insertions, 0 deletions

diff --git a/GradeBook.tcl b/GradeBook.tcl
index f38b307..f75d910 100755
--- a/GradeBook.tcl
+++ b/GradeBook.tcl
@@ -77,6 +77,7 @@ proc CreateGradesTable {db} {
 proc CreateAccessRightsTable {db} {
 	db eval {CREATE TABLE AccessRightsTable(actionname text,               instructor integer, ta integer, student integer,  guest integer)}
 	# guest should have no rights make sure that 0 is evereywhere
+	db eval {INSERT INTO AccessRightsTable VALUES('logon',          1,                  1,          1,                1)}
 	db eval {INSERT INTO AccessRightsTable VALUES('showgrades',            1,                  1,          1,                0)}
 	db eval {INSERT INTO AccessRightsTable VALUES('sort',                  1,                  1,          0,                0)}   
 	db eval {INSERT INTO AccessRightsTable VALUES('addcolumnrequest',      1,                  1,          0,                0)}