diff --git a/site_ansto/instrument/config/nexus/nxscripts_common_1.tcl b/site_ansto/instrument/config/nexus/nxscripts_common_1.tcl
index 3b77c3fe..1f559015 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.11 $}]
+set tmpstr [string map {"$" ""} {$Revision: 1.12 $}]
 set nx_content_revision_num [lindex $tmpstr [expr [llength $tmpstr] - 1]]
 
 MakeNXScript
@@ -91,11 +91,10 @@ proc hmm_save {nxobj entryname point} {
     $nxobj putfloat dradius [SplitReply [detector_radius_mm]] 
     $nxobj puttext dlayout area
 #    $nxobj puthm dcounts hmm [SplitReply [hmm_start]] [SplitReply [hmm_length]] [SplitReply [hmm_bank]]
-#XXX    set histo_length [SplitReply [hmm_length]]
+    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 
-#XXX    $nxobj putslab hmcounts [list $point 0 0] [list 1 $dim0 $dim1 ] hmm [SplitReply [hmm_start]] $histo_length [SplitReply [hmm_bank]]
+    $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 makelink scandata hmcounts
     $nxobj makelink scanvertaxis dvaxis