diff --git a/src/helper/startup.tcl b/src/helper/startup.tcl index d1c73ef3f..4c71a9a0f 100644 --- a/src/helper/startup.tcl +++ b/src/helper/startup.tcl @@ -61,10 +61,3 @@ add_usage_text script "" ######### -# catch any exceptions, capture output and return output -proc capture_catch {a} { - catch { - capture {uplevel $a} - } result - return $result -}