Fix saving t0_chopper_freq and tof length values.

2014-07-20 21:42:36 +10:00
parent 3d051f5bb9
commit b9f67a2562
2 changed files with 18 additions and 17 deletions
--- a/site_ansto/instrument/bilby/config/chopper/chopper.tcl
+++ b/site_ansto/instrument/bilby/config/chopper/chopper.tcl
@@ -45,7 +45,7 @@ if [dict exists $::config_dict disk_chopper name] {
 ::utility::macro::getset float t0_chopper_freq [subst { {chopper $ch_name} }] {
  set cid [SplitReply [t0_chopper_id]]
  set rpm [hval /instrument/$chopper/disk_$cid/aspeed]
-  return [expr $rpm / 60.0]
+  return "t0_chopper_freq = [expr $rpm / 60.0]"
 }
 sicslist setatt t0_chopper_freq klass NXdisk_chopper
 sicslist setatt t0_chopper_freq long_name t0_chopper_freq