Index: main.tcl ================================================================== --- main.tcl +++ main.tcl @@ -137,11 +137,11 @@ } err]} { if {$npf_failed} { puts "NPF Failed: $npf_err" } - puts "Failed: $::errorInfo" + puts "Failed: $err" set exit 1 }