summaryrefslogtreecommitdiffstats
path: root/ds9/library/util.tcl
diff options
context:
space:
mode:
authorWilliam Joye <wjoye@cfa.harvard.edu>2019-05-09 17:31:49 (GMT)
committerWilliam Joye <wjoye@cfa.harvard.edu>2019-05-09 17:31:49 (GMT)
commit37e757832a7f2c690cea41df5bf9cfa9ee18f67f (patch)
tree71de1ec46ac26e888c422b8e66aeea96129b0cb0 /ds9/library/util.tcl
parente17e833a826046e26825799dde37d887dfa5bcd3 (diff)
downloadblt-37e757832a7f2c690cea41df5bf9cfa9ee18f67f.zip
blt-37e757832a7f2c690cea41df5bf9cfa9ee18f67f.tar.gz
blt-37e757832a7f2c690cea41df5bf9cfa9ee18f67f.tar.bz2
DARWIN: reposition window to upper left corner if X11 and Darwin for SaveAs and Movie
Diffstat (limited to 'ds9/library/util.tcl')
-rw-r--r--ds9/library/util.tcl4
1 files changed, 3 insertions, 1 deletions
diff --git a/ds9/library/util.tcl b/ds9/library/util.tcl
index 7d04674..c3a297f 100644
--- a/ds9/library/util.tcl
+++ b/ds9/library/util.tcl
@@ -1359,7 +1359,9 @@ proc DarwinPhotoRestore {geom} {
global ds9
global tcl_platform
- if {$ds9(wm) == {x11} && $tcl_platform(os) == {Darwin}} {
+ if {$geom != {} &&
+ $ds9(wm) == {x11} &&
+ $tcl_platform(os) == {Darwin}} {
wm geometry $ds9(top) $geom
}
}