summaryrefslogtreecommitdiffstats
path: root/ds9/library
diff options
context:
space:
mode:
Diffstat (limited to 'ds9/library')
-rw-r--r--ds9/library/markeranalysishist.tcl6
-rw-r--r--ds9/library/markeranalysisplot2d.tcl8
-rw-r--r--ds9/library/markeranalysisplot3d.tcl8
3 files changed, 17 insertions, 5 deletions
diff --git a/ds9/library/markeranalysishist.tcl b/ds9/library/markeranalysishist.tcl
index 9bb109b..83d57a9 100644
--- a/ds9/library/markeranalysishist.tcl
+++ b/ds9/library/markeranalysishist.tcl
@@ -74,7 +74,11 @@ proc MarkerAnalysisHistogramCB {frame id} {
if {!$ping} {
set tt [string totitle [$frame get marker $id type]]
- PlotLineDialog $vvarname $tt Histogram Values Counts
+ set bunit [string trim [$frame get fits header keyword BUNIT]]
+ if {$bunit=={}} {
+ set bunit {Values}
+ }
+ PlotLineDialog $vvarname $tt Histogram $bunit Counts
set vvar(manage) 0
set vvar(dim) xy
diff --git a/ds9/library/markeranalysisplot2d.tcl b/ds9/library/markeranalysisplot2d.tcl
index 121e948..a8fdf1d 100644
--- a/ds9/library/markeranalysisplot2d.tcl
+++ b/ds9/library/markeranalysisplot2d.tcl
@@ -154,7 +154,11 @@ proc MarkerAnalysisPlot2dCB {frame id} {
if {!$ping} {
set tt [string totitle [$frame get marker $id type]]
- PlotLineDialog $vvarname $tt {} $vvar(system) Counts
+ set vvar(bunit) [string trim [$frame get fits header keyword BUNIT]]
+ if {$vvar(bunit)=={}} {
+ set vvar(bunit) {Counts}
+ }
+ PlotLineDialog $vvarname $tt {} $vvar(system) $vvar(bunit)
MarkerAnalysisPlot2dXAxisTitle $vvarname
MarkerAnalysisPlot2dYAxisTitle $vvarname
@@ -240,7 +244,7 @@ proc MarkerAnalysisPlot2dYAxisTitle {vvarname} {
global $vvarname
# set for plot code
- set vvar(axis,y,title) "Counts [string totitle $vvar(method)]"
+ set vvar(axis,y,title) "$vvar(bunit) [string totitle $vvar(method)]"
# update now (may not make it into plot code)
$vvar(graph) yaxis configure -title $vvar(axis,y,title)
diff --git a/ds9/library/markeranalysisplot3d.tcl b/ds9/library/markeranalysisplot3d.tcl
index e448249..e26dd0b 100644
--- a/ds9/library/markeranalysisplot3d.tcl
+++ b/ds9/library/markeranalysisplot3d.tcl
@@ -152,7 +152,11 @@ proc MarkerAnalysisPlot3dCB {frame id} {
if {!$ping} {
set tt [string totitle [$frame get marker $id type]]
- PlotLineDialog $vvarname $tt {} $vvar(system) Counts
+ set vvar(bunit) [string trim [$frame get fits header keyword BUNIT]]
+ if {$vvar(bunit)=={}} {
+ set vvar(bunit) {Counts}
+ }
+ PlotLineDialog $vvarname $tt {} $vvar(system) $vvar(bunit)
MarkerAnalysisPlot3dXAxisTitle $vvarname
MarkerAnalysisPlot3dYAxisTitle $vvarname
@@ -297,7 +301,7 @@ proc MarkerAnalysisPlot3dYAxisTitle {vvarname} {
global $vvarname
# set for plot code
- set vvar(axis,y,title) "Counts [string totitle $vvar(method)]"
+ set vvar(axis,y,title) "$vvar(bunit) [string totitle $vvar(method)]"
# update now (may not make it into plot code)
$vvar(graph) yaxis configure -title $vvar(axis,y,title)