diff options
| author | Eugeniy E. Mikhailov <evgmik@gmail.com> | 2022-03-27 21:17:16 -0400 |
|---|---|---|
| committer | Eugeniy E. Mikhailov <evgmik@gmail.com> | 2022-03-27 21:17:16 -0400 |
| commit | 21f626b14241aaa762df87aa6dafdfa5223d061c (patch) | |
| tree | 6119b50af420b01f2d42144bbdafbfbf4ed85100 /importGrades2gradebook.tcl | |
| parent | 4c3752af5af9807f39ab4d5ee77010b05e64a33d (diff) | |
| download | GradeBook-21f626b14241aaa762df87aa6dafdfa5223d061c.tar.gz GradeBook-21f626b14241aaa762df87aa6dafdfa5223d061c.zip | |
update diagnostic for skipped columns
Diffstat (limited to 'importGrades2gradebook.tcl')
| -rwxr-xr-x | importGrades2gradebook.tcl | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/importGrades2gradebook.tcl b/importGrades2gradebook.tcl index f4a3161..feeed49 100755 --- a/importGrades2gradebook.tcl +++ b/importGrades2gradebook.tcl @@ -350,8 +350,12 @@ proc updateGrade { col locUname grade } { proc pickCols2import { cols2import skipCreationCol categories2import } { set reduced_list {} foreach col $cols2import { + if { "$col" eq "" } { + dbg "skipping column with empty name" + continue + } if { [isInList $col $skipCreationCol] } { - dbg "skipping column $col" + dbg "skipping column $col, it is in $skipCreationCol list" continue } set colInfo [parseColName $col] |