Implemented changes requested in

pvh email: RFS Echidna data file structure (09/01/07)

r1397 | ffr | 2007-01-12 11:46:57 +1100 (Fri, 12 Jan 2007) | 3 lines
This commit is contained in:
Ferdi Franceschini
2007-01-12 11:46:57 +11:00
committed by Douglas Clowes
parent 16d48adb16
commit f3ece2769d
4 changed files with 11 additions and 12 deletions

View File

@@ -1,5 +1,5 @@
# $Revision: 1.10 $
# $Date: 2007-01-09 22:15:02 $
# $Revision: 1.11 $
# $Date: 2007-01-12 00:46:57 $
# Author: Ferdi Franceschini (ffr@ansto.gov.au)
# Last revision by: $Author: ffr $
@@ -25,11 +25,11 @@ VarMake sics_mono_crystal Text User
fileeval motor_configuration.tcl
proc nxcreatefile {{type nx5}} {
proc nxcreatefile {{type nx.hdf}} {
global dataFileName nxFileOpen;
SicsDataPostFix .$type;
array set nxmode [list h5 create5 nx5 create5 xml createxml];
array set nxmode [list nx.hdf create5 h5 create5 nx5 create5 xml createxml];
set dataFileName [nxscript makefilename]
nxscript $nxmode($type) $dataFileName echidna.dic;
set nxFileOpen true