diff options
author | William Joye <wjoye@cfa.harvard.edu> | 2018-11-29 20:40:36 (GMT) |
---|---|---|
committer | William Joye <wjoye@cfa.harvard.edu> | 2018-11-29 20:40:36 (GMT) |
commit | 88e89bb5360cd136fe6adc5e2acd4c0cab63937b (patch) | |
tree | 2bb7c49ccca53dee240f4b25cc1cc712e6bf82c6 /ds9/library/mwcs.tcl | |
parent | 0d8f331b170e7ef0b795dee958e439acea146688 (diff) | |
download | blt-88e89bb5360cd136fe6adc5e2acd4c0cab63937b.zip blt-88e89bb5360cd136fe6adc5e2acd4c0cab63937b.tar.gz blt-88e89bb5360cd136fe6adc5e2acd4c0cab63937b.tar.bz2 |
enable/disable buttons if no frame
Diffstat (limited to 'ds9/library/mwcs.tcl')
-rw-r--r-- | ds9/library/mwcs.tcl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/ds9/library/mwcs.tcl b/ds9/library/mwcs.tcl index b9c6755..e9b0c6c 100644 --- a/ds9/library/mwcs.tcl +++ b/ds9/library/mwcs.tcl @@ -29,6 +29,7 @@ proc UpdateWCSMenu {} { if {$current(frame) != {}} { $ds9(mb) entryconfig [msgcat::mc {WCS}] -state normal + ConfigureButtons wcs normal set ww [$current(frame) get wcs] set wcs(system) [lindex $ww 0] @@ -44,6 +45,7 @@ proc UpdateWCSMenu {} { LayoutWCSInfoBox $current(frame) } else { $ds9(mb) entryconfig [msgcat::mc {WCS}] -state disabled + ConfigureButtons wcs disabled } } |