From a00b32dbe46dad5165c8f9f384bd599a4182b7b8 Mon Sep 17 00:00:00 2001
From: Ferdi Franceschini <ffr@ansto.gov.au>
Date: Tue, 4 Nov 2008 17:00:52 +1100
Subject: [PATCH] Publish chopper::ready? and get_frequency procs.

r2734 | ffr | 2008-11-04 17:00:52 +1100 (Tue, 04 Nov 2008) | 2 lines
---
 .../instrument/reflectometer/config/chopper/chopper.tcl      | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/site_ansto/instrument/reflectometer/config/chopper/chopper.tcl b/site_ansto/instrument/reflectometer/config/chopper/chopper.tcl
index 6a85751a..b71aefe5 100644
--- a/site_ansto/instrument/reflectometer/config/chopper/chopper.tcl
+++ b/site_ansto/instrument/reflectometer/config/chopper/chopper.tcl
@@ -18,8 +18,6 @@ if {$sim_mode == "true"} {
   proc ::chopper::set_frequency {freq} {variable frequency; set frequency $freq}
   ::chopper::set_frequency 0
 
-  publish ::chopper::ready? user
-  publish ::chopper::get_frequency user
   publish ::chopper::set_frequency user
 } else {
 # Chopper NCS013 communications
@@ -72,6 +70,9 @@ if {$sim_mode == "true"} {
   }
 }
 
+publish ::chopper::ready? user
+publish ::chopper::get_frequency user
+
 sicslist setatt ch1speed units "rpm"
 sicslist setatt ch2speed units "rpm"
 sicslist setatt ch3speed units "rpm"