diff options
| -rwxr-xr-x | GradeBook.tcl | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/GradeBook.tcl b/GradeBook.tcl index 70b7873..08d8a58 100755 --- a/GradeBook.tcl +++ b/GradeBook.tcl @@ -305,7 +305,6 @@ proc AddColumn { permission_list user } { if { $columnname2add != "" } { set eval_str [concat ALTER TABLE GradesTable ADD \"$columnname2add\" real] - puts $eval_str set err [catch {db eval $eval_str } errStat] if { $err } { puts "the following error happen: $errStat" |