summaryrefslogtreecommitdiffstats
path: root/ds9/library/plotprocess.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'ds9/library/plotprocess.tcl')
-rw-r--r--ds9/library/plotprocess.tcl24
1 files changed, 0 insertions, 24 deletions
diff --git a/ds9/library/plotprocess.tcl b/ds9/library/plotprocess.tcl
index fc7b171..6a6557a 100644
--- a/ds9/library/plotprocess.tcl
+++ b/ds9/library/plotprocess.tcl
@@ -248,22 +248,6 @@ proc PlotCmdSaveConfig {fn} {
}
}
-proc PlotCmdSet {which value {cmd {}}} {
- global cvarname
- upvar #0 $cvarname cvar
-
- set cvar($which) $value
- if {$cmd != {}} {
- eval $cmd $cvarname
- }
-}
-
-proc PlotCmdPrint {} {
- global cvarname
-
- PlotPostScript $cvarname
-}
-
proc PlotCmdUpdateGraph {which value} {
global cvarname
upvar #0 $cvarname cvar
@@ -302,14 +286,6 @@ proc PlotCmdFontStyle {which value} {
$cvar(proc,updategraph) $cvarname
}
-proc PlotCmdSelect {value} {
- global cvarname
- upvar #0 $cvarname cvar
-
- set cvar(data,current) $value
- PlotCurrentData $cvarname
-}
-
# File Menu
proc ProcessPlotPrint {varname xarname iname} {
upvar #0 $varname var