summaryrefslogtreecommitdiffstats
path: root/ds9/library/plotline.tcl
diff options
context:
space:
mode:
authorWilliam Joye <wjoye@cfa.harvard.edu>2019-05-24 19:46:21 (GMT)
committerWilliam Joye <wjoye@cfa.harvard.edu>2019-05-24 19:46:21 (GMT)
commitecfba834a6bbe38a4994f364c805f8305e1b7c5f (patch)
tree9fdac4a82239d14de9b6f326848a322003c293f2 /ds9/library/plotline.tcl
parentdceb443889b818b469be319def725a2d957e3e02 (diff)
downloadblt-ecfba834a6bbe38a4994f364c805f8305e1b7c5f.zip
blt-ecfba834a6bbe38a4994f364c805f8305e1b7c5f.tar.gz
blt-ecfba834a6bbe38a4994f364c805f8305e1b7c5f.tar.bz2
add strip plot support
Diffstat (limited to 'ds9/library/plotline.tcl')
-rw-r--r--ds9/library/plotline.tcl7
1 files changed, 5 insertions, 2 deletions
diff --git a/ds9/library/plotline.tcl b/ds9/library/plotline.tcl
index 60f1d1b..44f71f2 100644
--- a/ds9/library/plotline.tcl
+++ b/ds9/library/plotline.tcl
@@ -226,12 +226,15 @@ proc PlotLineUpdateElement {varname} {
upvar #0 $varname var
global $varname
+ set tt $var(graph,total)
+ set cc $var(graph,current)
+
# warning: uses current vars
- if {$var(data,total) == 0} {
+ if {$tt == 0} {
return
}
- set nn $var(data,current)
+ set nn $var(graph$cc,data,current)
PlotGetVar $varname $nn
if {$var(fill)} {