From 2bccebe11d54ea976568f960bfd3da52bc9cb1ce Mon Sep 17 00:00:00 2001
From: William Joye <wjoye@cfa.harvard.edu>
Date: Wed, 24 Jul 2019 12:09:56 -0400
Subject: support multiple graphs per  plot

---
 ds9/library/plot.tcl | 14 --------------
 1 file changed, 14 deletions(-)

diff --git a/ds9/library/plot.tcl b/ds9/library/plot.tcl
index 75fd2a4..825a509 100644
--- a/ds9/library/plot.tcl
+++ b/ds9/library/plot.tcl
@@ -308,20 +308,6 @@ proc PlotDeleteDataSetCurrent {varname} {
     PlotDeleteDataSet $varname
 }
 
-proc PlotDeleteDataSetAll {varname} {
-    upvar #0 $varname var
-    global $varname
-
-    if {[llength $var(graph,dss)] == 0} {
-	return
-    }
-
-    foreach nn $var(graph,dss) {
-	set var(graph,ds,current) $nn
-	PlotDeleteDataSet $varname
-    }
-}
-
 proc PlotDeleteDataSet {varname} {
     upvar #0 $varname var
     global $varname
-- 
cgit v0.12