From c61c709b11be0995c3a3b2e28508631519b5b9f0 Mon Sep 17 00:00:00 2001 From: Douglas Clowes Date: Thu, 5 Jun 2008 15:32:42 +1000 Subject: [PATCH] add msd klass unitsa and long_name r2611 | dcl | 2008-06-05 15:32:42 +1000 (Thu, 05 Jun 2008) | 2 lines --- .../instrument/hrpd/config/motors/motor_configuration.tcl | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/site_ansto/instrument/hrpd/config/motors/motor_configuration.tcl b/site_ansto/instrument/hrpd/config/motors/motor_configuration.tcl index 53544854..133af8e2 100644 --- a/site_ansto/instrument/hrpd/config/motors/motor_configuration.tcl +++ b/site_ansto/instrument/hrpd/config/motors/motor_configuration.tcl @@ -1,5 +1,5 @@ -# $Revision: 1.26 $ -# $Date: 2008-06-04 06:08:08 $ +# $Revision: 1.27 $ +# $Date: 2008-06-05 05:32:42 $ # Author: Ferdi Franceschini (ffr@ansto.gov.au) # Last revision by: $Author: dcl $ source $cfPath(anticollider)/anticollider.tcl @@ -671,6 +671,9 @@ Motor msd ASIM [params\ hardlowerlim 2500\ hardupperlim 3500\ ] +sicslist setatt msd klass sample +sicslist setatt msd units mm +sicslist setatt msd long_name monochromator_sample_distance proc mthGet {} { return [expr [SplitReply [mtth]]/2.0]} proc mthSet {val} { return "mtth=[SplitReply [mtth]]"}