diff options
| author | William Joye <wjoye@cfa.harvard.edu> | 2018-03-30 17:29:42 (GMT) |
|---|---|---|
| committer | William Joye <wjoye@cfa.harvard.edu> | 2018-03-30 17:29:42 (GMT) |
| commit | 7eb41b824cd7b714b4a22a47ec725c6af6d65565 (patch) | |
| tree | 94e461d66774f15bdc9482d7462a21e1cf38fb08 /ds9/library/3d.tcl | |
| parent | 9e0b470e3269dfbebb93ae9ec66839aab9689568 (diff) | |
| download | blt-7eb41b824cd7b714b4a22a47ec725c6af6d65565.zip blt-7eb41b824cd7b714b4a22a47ec725c6af6d65565.tar.gz blt-7eb41b824cd7b714b4a22a47ec725c6af6d65565.tar.bz2 | |
update ds9 3d parser
Diffstat (limited to 'ds9/library/3d.tcl')
| -rw-r--r-- | ds9/library/3d.tcl | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/ds9/library/3d.tcl b/ds9/library/3d.tcl index 6a42f92..4199f87 100644 --- a/ds9/library/3d.tcl +++ b/ds9/library/3d.tcl @@ -569,6 +569,15 @@ proc Process3DCmd {varname iname} { } } +proc ThreedCmdSet {which value {cmd {}}} { + global threed + + set threed($which) $value + if {$cmd != {}} { + eval $cmd + } +} + proc ProcessSend3DCmd {proc id param} { global threed |