summaryrefslogtreecommitdiffstats
path: root/ds9/library/plotprocess.tcl
diff options
context:
space:
mode:
authorWilliam Joye <wjoye@cfa.harvard.edu>2019-06-27 16:49:46 (GMT)
committerWilliam Joye <wjoye@cfa.harvard.edu>2019-06-27 16:49:46 (GMT)
commit43bd43cf0f8286239acfc4e5b124b22c388e3a45 (patch)
tree7b785590535f2e0ad034c2bb1b7cdaa626a95bf7 /ds9/library/plotprocess.tcl
parenta3659eb4fd12a9cf56552659e718b7d5c4d99ed8 (diff)
downloadblt-43bd43cf0f8286239acfc4e5b124b22c388e3a45.zip
blt-43bd43cf0f8286239acfc4e5b124b22c388e3a45.tar.gz
blt-43bd43cf0f8286239acfc4e5b124b22c388e3a45.tar.bz2
support multiple graph plots
Diffstat (limited to 'ds9/library/plotprocess.tcl')
-rw-r--r--ds9/library/plotprocess.tcl4
1 files changed, 2 insertions, 2 deletions
diff --git a/ds9/library/plotprocess.tcl b/ds9/library/plotprocess.tcl
index 85099c1..d4621fe 100644
--- a/ds9/library/plotprocess.tcl
+++ b/ds9/library/plotprocess.tcl
@@ -286,7 +286,7 @@ proc PlotCmdUpdateGraph {which value} {
upvar #0 $cvarname cvar
set cvar($which) $value
- UpdateGraph $cvarname
+ $cvar(proc,updategraph) $cvarname
}
proc PlotCmdUpdateElement {which value} {
@@ -340,7 +340,7 @@ proc PlotCmdSelectData {which} {
upvar #0 $cvarname cvar
set cc $cvar(graph,current)
- set cvar($cc,data,current) $which
+ set cvar($cc,ds,current) $which
PlotCurrentDataSet $cvarname
}