Fetch descriptive motor name from the motor's long_name field.
r1769 | ffr | 2007-04-01 12:34:29 +1000 (Sun, 01 Apr 2007) | 2 lines
This commit is contained in:
committed by
Douglas Clowes
parent
bb588c7d05
commit
e67510e6bd
@@ -7,7 +7,7 @@
|
||||
|
||||
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.15 $}]
|
||||
set tmpstr [string map {"$" ""} {$Revision: 1.16 $}]
|
||||
set nx_content_revision_num [lindex $tmpstr [expr [llength $tmpstr] - 1]]
|
||||
|
||||
MakeNXScript
|
||||
@@ -213,7 +213,7 @@ proc fillPath {nxobj sobj} {
|
||||
|
||||
proc fillMotPath {nxobj motor} {
|
||||
$nxobj updatedictvar mot_name $motor;
|
||||
$nxobj updatedictvar mot_long_name $motor;
|
||||
$nxobj updatedictvar mot_long_name [SplitReply [$motor long_name]];
|
||||
$nxobj updatedictvar mot_units [SplitReply [$motor units]];
|
||||
}
|
||||
|
||||
|
||||
Reference in New Issue
Block a user