summaryrefslogtreecommitdiffstats
path: root/ds9/library/multiframe.tcl
diff options
context:
space:
mode:
authorWilliam Joye <wjoye@cfa.harvard.edu>2018-04-18 16:44:37 (GMT)
committerWilliam Joye <wjoye@cfa.harvard.edu>2018-04-18 16:44:37 (GMT)
commit9233a3ff10963bc4f233c797184610685b6205f4 (patch)
tree65b049206488c205c5c54a675e721b46b56f226a /ds9/library/multiframe.tcl
parent80fcf2440ac675ecb86879f89c2cc7578585adeb (diff)
downloadblt-9233a3ff10963bc4f233c797184610685b6205f4.zip
blt-9233a3ff10963bc4f233c797184610685b6205f4.tar.gz
blt-9233a3ff10963bc4f233c797184610685b6205f4.tar.bz2
fix -mulitframe gz problem
Diffstat (limited to 'ds9/library/multiframe.tcl')
-rw-r--r--ds9/library/multiframe.tcl7
1 files changed, 4 insertions, 3 deletions
diff --git a/ds9/library/multiframe.tcl b/ds9/library/multiframe.tcl
index 666d81e..03a5307 100644
--- a/ds9/library/multiframe.tcl
+++ b/ds9/library/multiframe.tcl
@@ -79,17 +79,18 @@ proc LoadMultiFrameAlloc {path fn} {
}
# ProcessLoad will clear loadParam each time
+ # can be gz, so use allocgz
set loadParam(file,type) fits
set loadParam(file,mode) {}
+ set loadParam(load,type) allocgz
+ set loadParam(load,layer) {}
if {$path != {}} {
- set loadParam(load,type) allocgz
set loadParam(file,name) "stdin\[$ext\]"
set loadParam(file,fn) "$path\[$ext\]"
} else {
- set loadParam(load,type) mmapincr
set loadParam(file,name) "$fn\[$ext\]"
+ set loadParam(file,fn) "$fn\[$ext\]"
}
- set loadParam(load,layer) {}
if {![ProcessLoad 0]} {
if {$ext} {