diff options
Diffstat (limited to 'blackboard2gradebook.tcl')
| -rwxr-xr-x | blackboard2gradebook.tcl | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/blackboard2gradebook.tcl b/blackboard2gradebook.tcl index dd49c80..84c7a4c 100755 --- a/blackboard2gradebook.tcl +++ b/blackboard2gradebook.tcl @@ -127,8 +127,8 @@ set eval_str [concat SELECT * FROM 'export_table'] 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 + puts [list "Skipping " AddUserNonWeb $v($fname) $v($lname) $email student $v($idnum) 1] + #AddUserNonWeb $v($fname) $v($lname) $email student $v($idnum) 1 } } errStat ] iferror $err $errStat |