1 files changed, 0 insertions, 17 deletions
diff --git a/GradeBook.tcl b/GradeBook.tcl
index 0f46d49..7b056f0 100755
--- a/GradeBook.tcl
+++ b/GradeBook.tcl
@@ -277,23 +277,6 @@ proc askToLogin {} {
 	puts "</div>"
 }
 
-
-
-
-#proc CheckAccessRights { user password} {}
-#proc IsUserknown {} {return 1}
-
-#proc SetLoginInfo {} {
-	#global user password
-	#set isAccessGranted [IsUserknown]
-	#if { $isAccessGranted } {
-		#dbg "access granted to user $user" 
-	#}
-
-	#set access_rights [CheckAccessRights $user $password]
-
-#}
-
 proc LogMeOn {} {
 	global user password
 	set user [::ncgi::value user guest]