diff options
| author | Eugeniy E. Mikhailov <evgmik@gmail.com> | 2023-10-15 21:14:21 -0400 |
|---|---|---|
| committer | Eugeniy E. Mikhailov <evgmik@gmail.com> | 2023-10-15 21:14:21 -0400 |
| commit | 85183a69301354079549eb4197da08bd115ef8fd (patch) | |
| tree | 83b8deb0e36346ab41b674fb187fd559100030db /importGrades2gradebook.tcl | |
| parent | df5a16c2f4e29bc2ab28a7bb04ba62279da9ca5a (diff) | |
| download | GradeBook-85183a69301354079549eb4197da08bd115ef8fd.tar.gz GradeBook-85183a69301354079549eb4197da08bd115ef8fd.zip | |
some more generic transformations
Diffstat (limited to 'importGrades2gradebook.tcl')
| -rwxr-xr-x | importGrades2gradebook.tcl | 11 |
1 files changed, 4 insertions, 7 deletions
diff --git a/importGrades2gradebook.tcl b/importGrades2gradebook.tcl index 55f55f4..e89bfd5 100755 --- a/importGrades2gradebook.tcl +++ b/importGrades2gradebook.tcl @@ -419,11 +419,7 @@ proc blackboardUsername2local { uname } { return "$uname@wm.edu" } -proc gradescopeUsername2local { uname } { - return $uname -} - -proc webassignUsername2local { uname } { +proc noTransformationNeededUsername2local { uname } { return $uname } @@ -527,6 +523,7 @@ set allForeignCols [getColListFromAnyTable foreignDB export_table] set dbOrigin Blackboard; # default if { {SID} in $allForeignCols } { set dbOrigin Gradescope } if { $dbFileToExport == "WebAssign.db" } { set dbOrigin WebAssign } +if { $dbFileToExport == "TheExperTA.db" } { set dbOrigin TheExpertTA } puts [list Detected foreign DB origin: $dbOrigin] switch $dbOrigin { @@ -539,7 +536,7 @@ switch $dbOrigin { alias parseColName parseBlackboardColName } Gradescope { - alias foreignUsername2local gradescopeUsername2local + alias foreignUsername2local noTransformationNeededUsername2local alias addStudentsFromForeignDB addStudentsFromGradescopeDB alias getForeignDBUsernames getGradescopeUsernames alias getForeignDBUserGrade getGradescopeUserGrade @@ -547,7 +544,7 @@ switch $dbOrigin { alias parseColName parseGradescopeColName } WebAssign { - alias foreignUsername2local webassignUsername2local + alias foreignUsername2local noTransformationNeededUsername2local alias addStudentsFromForeignDB addStudentsFromWebassignDB alias getForeignDBUsernames getWebassignUsernames alias getForeignDBUserGrade getWebassignUserGrade |