fixed confusion export -> import

1 files changed, 7 insertions, 7 deletions

diff --git a/blackboard2gradebook.tcl b/blackboard2gradebook.tcl
index dd107c7..609a479 100755
--- a/blackboard2gradebook.tcl
+++ b/blackboard2gradebook.tcl
@@ -46,8 +46,8 @@ try {
 }
 
 ################# Config ############################################
-set categories2export [list FinalExam HomeWork LabReport]
-#set categories2export [list FinalExam]
+set categories2import [list FinalExam HomeWork LabReport]
+#set categories2import [list FinalExam]
 
 set commonInfoCol {{First Name} {Last Name} {Student ID} {Last Access} Username Availability }
 set infoColumsMarkers {{ - Lateness \(H:M:S\)} { - Max Points} { - Submission Time} {Total Lateness \(H:M:S\)} {Current Weighted} {Total \[} }
@@ -68,7 +68,7 @@ set DBDEBUG [expr {$params(d)}]
 set classDB [lindex $argv 0] 
 set blackboardDB [lindex $argv 1]
 
-puts [list Categories to export: $categories2export]
+puts [list Categories to import: $categories2import]
 
 sqlite3 db $classDB
 sqlite3 bdb $blackboardDB
@@ -234,7 +234,7 @@ proc updateGrade { col locUname grade } {
 	}
 }
 
-proc pickCols2import { cols2import skipCreationCol categories2export } {
+proc pickCols2import { cols2import skipCreationCol categories2import } {
 	set reduced_list {}
 	foreach col $cols2import {
 		if { [isInList $col $skipCreationCol] } {
@@ -243,8 +243,8 @@ proc pickCols2import { cols2import skipCreationCol categories2export } {
 		}
 		set colInfo  [trimColName $col]
 		set category [lindex $colInfo 1]
-		if { $category ni $categories2export } {
-			dbg [list skipping $col in $category, permitted categories: $categories2export]
+		if { $category ni $categories2import } {
+			dbg [list skipping $col in $category, permitted categories: $categories2import]
 			continue
 		}
 		lappend reduced_list $col
@@ -274,7 +274,7 @@ addStudentsFromDB bdb
 set username_list [getBlackboardUsernames bdb]
 set cols2import [getColListFromAnyTable bdb export_table]
 
-set cols2import [ pickCols2import $cols2import $skipCreationCol $categories2export]
+set cols2import [ pickCols2import $cols2import $skipCreationCol $categories2import]
 
 foreach col $cols2import {
 	set colInfo  [trimColName $col]