summaryrefslogtreecommitdiffstats
path: root/ds9/library/plotprocess.tcl
diff options
context:
space:
mode:
authorWilliam Joye <wjoye@cfa.harvard.edu>2019-06-07 19:51:30 (GMT)
committerWilliam Joye <wjoye@cfa.harvard.edu>2019-06-07 19:51:30 (GMT)
commit3e0e98282ec1f35833f975990cbd69a12843c475 (patch)
tree734b9a5b6a1420d08863451e618e77601ae8ff51 /ds9/library/plotprocess.tcl
parent2ea2b0e83a4b3c58d82b13d4d26fdad5b3853d2e (diff)
downloadblt-3e0e98282ec1f35833f975990cbd69a12843c475.zip
blt-3e0e98282ec1f35833f975990cbd69a12843c475.tar.gz
blt-3e0e98282ec1f35833f975990cbd69a12843c475.tar.bz2
support multiple graphs per plot
Diffstat (limited to 'ds9/library/plotprocess.tcl')
-rw-r--r--ds9/library/plotprocess.tcl5
1 files changed, 2 insertions, 3 deletions
diff --git a/ds9/library/plotprocess.tcl b/ds9/library/plotprocess.tcl
index 15e5e69..42c883d 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
- $cvar(proc,updategraph) $cvarname
+ UpdateGraph $cvarname
}
proc PlotCmdUpdateElement {which value} {
@@ -315,7 +315,6 @@ proc PlotCmdFontStyle {which value} {
set cvar($which,slant) italic
}
}
-
$cvar(proc,updatecanvas) $cvarname
}
@@ -342,7 +341,7 @@ proc PlotCmdSelectData {which} {
set cc $cvar(graph,current)
set cvar($cc,data,current) $which
- PlotCurrentData $cvarname
+ PlotCurrent $cvarname
}
# used by SAMP and CATALOG