summaryrefslogtreecommitdiffstats
path: root/ds9
diff options
context:
space:
mode:
authorWilliam Joye <wjoye@cfa.harvard.edu>2018-12-19 18:59:41 (GMT)
committerWilliam Joye <wjoye@cfa.harvard.edu>2018-12-19 18:59:41 (GMT)
commit0587fffc5409653d44546dbcebc7a497954cbb46 (patch)
tree312b750afe3bdbe92b5727e2e552da8ed1751b7f /ds9
parent577979edc42a395c12bd1c1b7b3cd4b8a7efb508 (diff)
downloadblt-0587fffc5409653d44546dbcebc7a497954cbb46.zip
blt-0587fffc5409653d44546dbcebc7a497954cbb46.tar.gz
blt-0587fffc5409653d44546dbcebc7a497954cbb46.tar.bz2
enable saveimage for windows
Diffstat (limited to 'ds9')
-rw-r--r--ds9/doc/release/r8.1.html1
-rw-r--r--ds9/library/saveimage.tcl8
2 files changed, 5 insertions, 4 deletions
diff --git a/ds9/doc/release/r8.1.html b/ds9/doc/release/r8.1.html
index d3bf697..bd1180e 100644
--- a/ds9/doc/release/r8.1.html
+++ b/ds9/doc/release/r8.1.html
@@ -24,6 +24,7 @@
<li><tt>12.14.2018 GRID: add checks to avoid NULL pointers in cases of odd WCS defs.</tt></li>
<li><tt>12.14.2018 BINNING: bring forward any 3rd column WCS defines for binned 3d cubes.</tt></li>
<li><tt>12.14.2018 PLOT3D: verify 3D WCS, reset to IMAGE if not available.</tt></li>
+<li><tt>12.19.2018 SAVEIMAGE: is now supported under Windows.</tt></li>
<li><tt><b>xx.xx.2018 RELEASE version 8.1b1</b></tt></li>
</ol>
</div>
diff --git a/ds9/library/saveimage.tcl b/ds9/library/saveimage.tcl
index cf6b240..ba421a2 100644
--- a/ds9/library/saveimage.tcl
+++ b/ds9/library/saveimage.tcl
@@ -31,8 +31,8 @@ proc SaveImageDef {} {
default {set saveimage(error) $aa}
}
}
- aqua -
- win32 {set saveimage(error) $cc}
+ aqua {set saveimage(error) $cc}
+ win32 {set saveimage(error) $aa}
}
}
@@ -117,11 +117,11 @@ proc SaveImagePhoto {fn format} {
switch $ds9(wm) {
x11 {}
- aqua -
- win32 {
+ aqua {
Error $saveimage(error)
return
}
+ win32 {}
}
set rr [catch {image create photo -format window -data $ds9(canvas)} ph]