Fix broken catch block

2014-07-15 12:51:41 +10:00
parent c1b5b558f0
commit d892d6c4df
1 changed files with 2 additions and 4 deletions
--- 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}
 }