startup: removed capture_catch

not used.

Signed-off-by: Øyvind Harboe <oyvind.harboe@zylin.com>

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