summaryrefslogtreecommitdiffstats
path: root/ds9/library/command.tcl
diff options
context:
space:
mode:
authorWilliam Joye <wjoye@cfa.harvard.edu>2017-08-22 18:35:58 (GMT)
committerWilliam Joye <wjoye@cfa.harvard.edu>2017-08-22 18:35:58 (GMT)
commit4b69d43161c8b6b8fe6493d50d965a90c5e58b88 (patch)
tree4603f05d3192c215e92fa5aaf93af1db64f1beb4 /ds9/library/command.tcl
parent2ce2cfcf340128b8c14f335581ec9819352fd7af (diff)
downloadblt-4b69d43161c8b6b8fe6493d50d965a90c5e58b88.zip
blt-4b69d43161c8b6b8fe6493d50d965a90c5e58b88.tar.gz
blt-4b69d43161c8b6b8fe6493d50d965a90c5e58b88.tar.bz2
clean up code
Diffstat (limited to 'ds9/library/command.tcl')
-rw-r--r--ds9/library/command.tcl11
1 files changed, 2 insertions, 9 deletions
diff --git a/ds9/library/command.tcl b/ds9/library/command.tcl
index 77bf8b4..2494049 100644
--- a/ds9/library/command.tcl
+++ b/ds9/library/command.tcl
@@ -87,7 +87,6 @@ proc ProcessCommand {argv argc} {
set file(layer) {}
set file(mosaic) wcs
- set load 0
set noopts 0
set i 0
@@ -460,10 +459,6 @@ proc ProcessCommand {argv argc} {
return
}
- if {$load == 0} {
- incr load
- }
-
switch $ds9(wm) {
x11 -
aqua {CommandLineLoad $item argv i}
@@ -482,15 +477,13 @@ proc ProcessCommand {argv argc} {
}
}
- FinishLoadPre
+ LoadUpdate
}
}
incr i
}
- if {$load != 0} {
- UpdateDS9
- }
+ UpdateDS9
}
proc CommandLineLoad {item argvname iname} {