diff --git a/site_ansto/instrument/config/nexus/nxscripts_common_1.tcl b/site_ansto/instrument/config/nexus/nxscripts_common_1.tcl index 940c8ebb..a2329877 100644 --- a/site_ansto/instrument/config/nexus/nxscripts_common_1.tcl +++ b/site_ansto/instrument/config/nexus/nxscripts_common_1.tcl @@ -1,7 +1,9 @@ # TODO Return filename from nxcreatefile and call nxreopen nxclose etc # with filename -set nx_content_release_tag [lindex [string map {"$" ""} {$Name: not supported by cvs2svn $}] 1] -set nx_content_revision_num [lindex [string map {"$" ""} {$Revision: 1.7 $}] 1] +set tmpstr [string map {"$" ""} {$Name: not supported by cvs2svn $}] +set nx_content_release_tag [lindex $tmpstr [llength $tmpstr]] +set tmpstr [string map {"$" ""} {$Revision: 1.8 $}] +set nx_content_release_tag [lindex $tmpstr [llength $tmpstr]] MakeNXScript sicsdatafactory new nxscript_data diff --git a/site_ansto/instrument/server_config.tcl b/site_ansto/instrument/server_config.tcl index c04886bc..c5b7ff74 100644 --- a/site_ansto/instrument/server_config.tcl +++ b/site_ansto/instrument/server_config.tcl @@ -1,7 +1,7 @@ # SICS common configuration -# $Revision: 1.20 $ -# $Date: 2007-03-28 01:55:39 $ +# $Revision: 1.21 $ +# $Date: 2007-03-28 03:04:29 $ # Author: Ferdi Franceschini (ffr@ansto.gov.au) # Last revision by $Author: ffr $ @@ -46,11 +46,13 @@ SicsDataPrefix [SplitReply [Instrument]] SicsDataPrefix lock VarMake sics_release Text Internal -sics_release [lindex [string map {"$" ""} {$Name: not supported by cvs2svn $}] 1] +set tmpstr [string map {"$" ""} {$Name: not supported by cvs2svn $}] +sics_release [lindex $tmpstr [llength $tmpstr]] sics_release lock VarMake sics_revision_num Text Internal -sics_revision_num [lindex [string map {"$" ""} {$Revision: 1.20 $}] 1] +set tmpstr [string map {"$" ""} {$Revision: 1.21 $}] +sics_revision_num [lindex $tmpstr [llength $tmpstr]] sics_revision_num lock VarMake SicsDataPath Text Internal