From d892d6c4df108fcb40eb59506defc5fe774e0452 Mon Sep 17 00:00:00 2001
From: Ferdi Franceschini <ffr@ansto.gov.au>
Date: Tue, 15 Jul 2014 12:51:41 +1000
Subject: [PATCH] Fix broken catch block

---
 .../instrument/config/environment/sct_protek_common.tcl     | 6 ++----
 1 file changed, 2 insertions(+), 4 deletions(-)

diff --git a/site_ansto/instrument/config/environment/sct_protek_common.tcl b/site_ansto/instrument/config/environment/sct_protek_common.tcl
index 0560674c..a5cb7656 100644
--- a/site_ansto/instrument/config/environment/sct_protek_common.tcl
+++ b/site_ansto/instrument/config/environment/sct_protek_common.tcl
@@ -152,10 +152,8 @@ proc MakeProtek {name sctName CID CTYPE {scale 1.0} {offset 0.0} {interval 0.5}
       $sctName poll /sics/$soState/state $interval
       $sctName poll /sics/$sobjName $interval
     }
-  } catch_message ] {
-    handle_exception ${catch_status} ${catch_message}
-  }
-  return /sics/$sobjName
+  } catch_message ]
+  handle_exception ${catch_status} ${catch_message}
 }