summaryrefslogtreecommitdiffstats
path: root/ds9/library/mwcs.tcl
diff options
context:
space:
mode:
authorWilliam Joye <wjoye@cfa.harvard.edu>2018-12-19 21:30:31 (GMT)
committerWilliam Joye <wjoye@cfa.harvard.edu>2018-12-19 21:30:31 (GMT)
commit21ae37c5a9db158c6c4d54a0fa75b8e0b526ebed (patch)
tree312b750afe3bdbe92b5727e2e552da8ed1751b7f /ds9/library/mwcs.tcl
parent50f1824860159ebdb3896e14647a4562edf658d2 (diff)
parent0587fffc5409653d44546dbcebc7a497954cbb46 (diff)
downloadblt-21ae37c5a9db158c6c4d54a0fa75b8e0b526ebed.zip
blt-21ae37c5a9db158c6c4d54a0fa75b8e0b526ebed.tar.gz
blt-21ae37c5a9db158c6c4d54a0fa75b8e0b526ebed.tar.bz2
Merge branch 'devel'
Diffstat (limited to 'ds9/library/mwcs.tcl')
-rw-r--r--ds9/library/mwcs.tcl2
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
}
}