summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorWilliam Joye <wjoye@cfa.harvard.edu>2019-06-28 21:42:38 (GMT)
committerWilliam Joye <wjoye@cfa.harvard.edu>2019-06-28 21:42:38 (GMT)
commitd5a2e828271ba0ff4ca328762d6f7197fdaf1600 (patch)
tree37fa70a9a1d5baa5710116e89b69fae8b64144ea
parent0fb9c6c8e990dd39236afc29b31f357152d35ad2 (diff)
downloadblt-d5a2e828271ba0ff4ca328762d6f7197fdaf1600.zip
blt-d5a2e828271ba0ff4ca328762d6f7197fdaf1600.tar.gz
blt-d5a2e828271ba0ff4ca328762d6f7197fdaf1600.tar.bz2
support multiple graph plots
-rw-r--r--ds9/library/plot.tcl1
-rw-r--r--ds9/library/plotline.tcl1
2 files changed, 0 insertions, 2 deletions
diff --git a/ds9/library/plot.tcl b/ds9/library/plot.tcl
index eb813cc..cc62cf9 100644
--- a/ds9/library/plot.tcl
+++ b/ds9/library/plot.tcl
@@ -141,7 +141,6 @@ proc PlotDeleteGraph {varname} {
}
# delete graph
- puts "destroy $var(graph)"
destroy $var(graph)
set ii [lsearch $var(graphs) $cc]
if {$ii>=0} {
diff --git a/ds9/library/plotline.tcl b/ds9/library/plotline.tcl
index 601905c..f03f6f5 100644
--- a/ds9/library/plotline.tcl
+++ b/ds9/library/plotline.tcl
@@ -147,7 +147,6 @@ proc PlotLineAddGraph {varname} {
set cc $var(graph,current)
set var($cc,type) line
- puts "create $var(graph)"
blt::graph $var(graph) -width 600 -height 500 -highlightthickness 0
}