diff options
-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] |