From 53e7a69cb0823e3c7fddbe95ff566226ebbcb745 Mon Sep 17 00:00:00 2001 From: Ferdi Franceschini Date: Sat, 31 Mar 2007 09:44:06 +1000 Subject: [PATCH] Removed duplicate parameters for hmm in putslab call. r1752 | ffr | 2007-03-31 09:44:06 +1000 (Sat, 31 Mar 2007) | 2 lines --- site_ansto/instrument/config/nexus/nxscripts_common_1.tcl | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/site_ansto/instrument/config/nexus/nxscripts_common_1.tcl b/site_ansto/instrument/config/nexus/nxscripts_common_1.tcl index 1f559015..8b0830c1 100644 --- a/site_ansto/instrument/config/nexus/nxscripts_common_1.tcl +++ b/site_ansto/instrument/config/nexus/nxscripts_common_1.tcl @@ -2,7 +2,7 @@ # with filename set tmpstr [string map {"$" ""} {$Name: not supported by cvs2svn $}] set nx_content_release_tag [lindex $tmpstr [expr [llength $tmpstr] - 1]] -set tmpstr [string map {"$" ""} {$Revision: 1.12 $}] +set tmpstr [string map {"$" ""} {$Revision: 1.13 $}] set nx_content_revision_num [lindex $tmpstr [expr [llength $tmpstr] - 1]] MakeNXScript @@ -90,12 +90,10 @@ proc hmm_save {nxobj entryname point} { $nxobj puttext ddesc [SplitReply [detector_description]] $nxobj putfloat dradius [SplitReply [detector_radius_mm]] $nxobj puttext dlayout area -# $nxobj puthm dcounts hmm [SplitReply [hmm_start]] [SplitReply [hmm_length]] [SplitReply [hmm_bank]] set histo_length [SplitReply [hmm_length]] $nxobj updatedictvar padim0 $dim0 $nxobj updatedictvar padim1 $dim1 - $nxobj putslab hmcounts [list $point 0 0] [list 1 $dim0 $dim1 ] hmm $nxobj putslab hmcounts [list $point 0 0] [list 1 $dim0 $dim1 ] hmm [SplitReply [hmm_start]] $histo_length [SplitReply [hmm_bank]] -# $nxobj putslab dcounts [list $point] [list 1] nxscript_data + $nxobj putslab hmcounts [list $point 0 0] [list 1 $dim0 $dim1 ] hmm [SplitReply [hmm_start]] $histo_length [SplitReply [hmm_bank]] $nxobj makelink scandata hmcounts $nxobj makelink scanvertaxis dvaxis }