diff --git a/site_ansto/instrument/gumxml.tcl b/site_ansto/instrument/gumxml.tcl index 8b430abd..bddf450a 100644 --- a/site_ansto/instrument/gumxml.tcl +++ b/site_ansto/instrument/gumxml.tcl @@ -61,6 +61,10 @@ proc make_nodes {path result indent} { } if {"$control" == "true"} { append result "$prefix\n" + if {[string compare -nocase $type "none"] != 0} { + set value [encode [hval $path]] + append result "$prefix $value\n" + } foreach p [property_elements $path $newIndent] { append result $p }