diff options
Diffstat (limited to 'ds9/library/markeranalysisplot3d.tcl')
-rw-r--r-- | ds9/library/markeranalysisplot3d.tcl | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/ds9/library/markeranalysisplot3d.tcl b/ds9/library/markeranalysisplot3d.tcl index dce3a09..e5c0dc6 100644 --- a/ds9/library/markeranalysisplot3d.tcl +++ b/ds9/library/markeranalysisplot3d.tcl @@ -223,6 +223,18 @@ proc MarkerAnalysisPlot3dMarker {vvarname} { } # hardcoded marker.C +proc MarkerAnalysisPlot3dSliceCB {frame id} { + global imarker + + set vvarname ${imarker(prefix,plot3d)}${id}${frame} + upvar #0 $vvarname vvar + global $vvarname + + set vvar(slice) [$frame get fits slice 2 $vvar(system)] + MarkerAnalysisPlot3dMarker $vvarname +} + +# hardcoded marker.C proc MarkerAnalysisPlot3dDeleteCB {frame id} { # this routine could be called by the region # after the dialog has been deleted |