summaryrefslogtreecommitdiffstats
path: root/ds9/library/plotscatter.tcl
diff options
context:
space:
mode:
authorWilliam Joye <wjoye@cfa.harvard.edu>2019-05-30 20:43:31 (GMT)
committerWilliam Joye <wjoye@cfa.harvard.edu>2019-05-30 20:43:31 (GMT)
commit5959a83a3b75cf5aacd951809d498158e76028fe (patch)
tree4dcad23210d2028c472f2a7b70bd0ef09ab333ce /ds9/library/plotscatter.tcl
parentf6e3a9d54ed5dd02aeda5f441146a42935082610 (diff)
downloadblt-5959a83a3b75cf5aacd951809d498158e76028fe.zip
blt-5959a83a3b75cf5aacd951809d498158e76028fe.tar.gz
blt-5959a83a3b75cf5aacd951809d498158e76028fe.tar.bz2
add multiple plot support
Diffstat (limited to 'ds9/library/plotscatter.tcl')
-rw-r--r--ds9/library/plotscatter.tcl6
1 files changed, 3 insertions, 3 deletions
diff --git a/ds9/library/plotscatter.tcl b/ds9/library/plotscatter.tcl
index 4bd19f4..d129a63 100644
--- a/ds9/library/plotscatter.tcl
+++ b/ds9/library/plotscatter.tcl
@@ -56,7 +56,7 @@ proc PlotScatterDialog {varname wtt title xaxis yaxis} {
# Data
$var(mb).data add checkbutton -label [msgcat::mc {Show}] \
- -variable ${varname}(graph$cc,show) \
+ -variable ${varname}(graph,ds,show) \
-command [list PlotScatterUpdateElement $varname]
$var(mb).data add separator
$var(mb).data add cascade -label [msgcat::mc {Shape}] \
@@ -126,7 +126,7 @@ proc PlotScatterUpdateElement {varname} {
set nn $var(graph$cc,data,current)
$var(graph$cc) element configure "d-${nn}" \
- -label $var(graph$cc,name) -hide [expr !$var(graph$cc,show)] \
+ -label $var(graph,ds,name) -hide [expr !$var(graph,ds,show)] \
-symbol $var(graph$cc,shape,symbol) -fill $clr -scalesymbols no \
-outline $var(graph$cc,shape,color) \
-linewidth 0 -pixels 5 \
@@ -183,7 +183,7 @@ proc PlotScatterHighliteElement {varname rowlist} {
return
}
- if {$var(graph$cc,show)} {
+ if {$var(graph,ds,show)} {
$var(graph$cc) element deactivate d-1
if {$rowlist != {}} {
# can have multiple rows