removed dry runs

1 files changed, 5 insertions, 5 deletions

diff --git a/blackboard2gradebook.tcl b/blackboard2gradebook.tcl
index be34eeb..dd49c80 100755
--- a/blackboard2gradebook.tcl
+++ b/blackboard2gradebook.tcl
@@ -128,7 +128,7 @@ set err [catch {
 	bdb eval $eval_str v {
 		set email $v(Username)@email.wm.edu
 		puts [list AddUserNonWeb $v($fname) $v($lname) $email student $v($idnum) 1]
-		#AddUserNonWeb $v($fname) $v($lname) $email student $v($idnum) 1
+		AddUserNonWeb $v($fname) $v($lname) $email student $v($idnum) 1
 		}
 	} errStat ]
 iferror $err $errStat
@@ -150,8 +150,8 @@ foreach col [getColListFromAnyTable bdb export_table] {
 		continue
 	}
 	if { ![doesColumnExists $shortCol GradesTable] } {
-		#AddColumnNonWeb $shortCol $category $maxScore
-		puts [list AddColumnNonWeb $shortCol $category $maxScore]
+		AddColumnNonWeb $shortCol $category $maxScore
+		#puts [list AddColumnNonWeb $shortCol $category $maxScore]
 	}
 	foreach uname $username_list {
 		set locUname $uname@email.wm.edu
@@ -161,8 +161,8 @@ foreach col [getColListFromAnyTable bdb export_table] {
 				# change percentage to score
 				set grade [ expr {$grade/100*$maxScore} ]
 			}
-			#UpdateColValue4UserNameNonWeb $shortCol $locUname $grade
-			puts [list UpdateColValue4UserNameNonWeb $shortCol $locUname $grade]
+			UpdateColValue4UserNameNonWeb $shortCol $locUname $grade
+			#puts [list UpdateColValue4UserNameNonWeb $shortCol $locUname $grade]
 		}
 	}
 }