diff options
author | William Joye <wjoye@cfa.harvard.edu> | 2019-06-28 21:42:38 (GMT) |
---|---|---|
committer | William Joye <wjoye@cfa.harvard.edu> | 2019-06-28 21:42:38 (GMT) |
commit | d5a2e828271ba0ff4ca328762d6f7197fdaf1600 (patch) | |
tree | 37fa70a9a1d5baa5710116e89b69fae8b64144ea | |
parent | 0fb9c6c8e990dd39236afc29b31f357152d35ad2 (diff) | |
download | blt-d5a2e828271ba0ff4ca328762d6f7197fdaf1600.zip blt-d5a2e828271ba0ff4ca328762d6f7197fdaf1600.tar.gz blt-d5a2e828271ba0ff4ca328762d6f7197fdaf1600.tar.bz2 |
support multiple graph plots
-rw-r--r-- | ds9/library/plot.tcl | 1 | ||||
-rw-r--r-- | ds9/library/plotline.tcl | 1 |
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 } |