diff options
Diffstat (limited to 'ds9/library/plotstate.tcl')
-rw-r--r-- | ds9/library/plotstate.tcl | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/ds9/library/plotstate.tcl b/ds9/library/plotstate.tcl index 8d20eb9..ed0ab97 100644 --- a/ds9/library/plotstate.tcl +++ b/ds9/library/plotstate.tcl @@ -113,6 +113,11 @@ proc PlotInitGraph {varname} { set var(graph,axis,y,format) $pap(graph,axis,y,format) # per DataSet + set var(graph1,xdata) {} + set var(graph1,ydata) {} + set var(graph1,xedata) {} + set var(graph1,yedata) {} + set var(graph,ds,name) $pap(graph,ds,name) set var(graph,ds,show) $pap(graph,ds,show) set var(graph,ds,smooth) $pap(graph,ds,smooth) @@ -167,6 +172,11 @@ proc PlotSaveState {varname} { set var($cc,axis,y,format) $var(graph,axis,y,format) # per DataSet + set var($cc,$nn,xdata) $var($cc,xdata) + set var($cc,$nn,ydata) $var($cc,ydata) + set var($cc,$nn,xedata) $var($cc,xedata) + set var($cc,$nn,yedata) $var($cc,yedata) + set var($cc,$nn,name) $var(graph,ds,name) set var($cc,$nn,show) $var(graph,ds,show) set var($cc,$nn,smooth) $var(graph,ds,smooth) @@ -221,6 +231,11 @@ proc PlotRestoreState {varname nn} { set var(graph,axis,y,format) $var($cc,axis,y,format) # per DataSet + set var($cc,xdata) $var($cc,$nn,xdata) + set var($cc,ydata) $var($cc,$nn,ydata) + set var($cc,xedata) $var($cc,$nn,xedata) + set var($cc,yedata) $var($cc,$nn,yedata) + set var(graph,ds,name) $var($cc,$nn,name) set var(graph,ds,show) $var($cc,$nn,show) set var(graph,ds,smooth) $var($cc,$nn,smooth) |