From f7e4a5fe11f0ce2bd0aba9fb0732fb2f99169165 Mon Sep 17 00:00:00 2001
From: Eugeniy Mikhailov <evgmik@gmail.com>
Date: Fri, 21 Jan 2011 11:59:27 -0500
Subject: removed unused commented out code

Ignore-this: f74502901e1fd6c498b7ffa9f07678a0

darcs-hash:20110121165927-067c0-1f958f6404ed76eb86d29c2c456f4de488393065.gz
---
 GradeBook.tcl | 17 -----------------
 1 file changed, 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]
-- 
cgit v1.2.3