summaryrefslogtreecommitdiffstats
path: root/ds9/library/mbin.tcl
diff options
context:
space:
mode:
authorWilliam Joye <wjoye@cfa.harvard.edu>2018-11-29 20:40:36 (GMT)
committerWilliam Joye <wjoye@cfa.harvard.edu>2018-11-29 20:40:36 (GMT)
commit88e89bb5360cd136fe6adc5e2acd4c0cab63937b (patch)
tree2bb7c49ccca53dee240f4b25cc1cc712e6bf82c6 /ds9/library/mbin.tcl
parent0d8f331b170e7ef0b795dee958e439acea146688 (diff)
downloadblt-88e89bb5360cd136fe6adc5e2acd4c0cab63937b.zip
blt-88e89bb5360cd136fe6adc5e2acd4c0cab63937b.tar.gz
blt-88e89bb5360cd136fe6adc5e2acd4c0cab63937b.tar.bz2
enable/disable buttons if no frame
Diffstat (limited to 'ds9/library/mbin.tcl')
-rw-r--r--ds9/library/mbin.tcl4
1 files changed, 4 insertions, 0 deletions
diff --git a/ds9/library/mbin.tcl b/ds9/library/mbin.tcl
index 9ada431..a0c8afd 100644
--- a/ds9/library/mbin.tcl
+++ b/ds9/library/mbin.tcl
@@ -323,11 +323,14 @@ proc UpdateBinMenu {} {
if {[$current(frame) has fits]} {
if {[$current(frame) has fits bin]} {
$ds9(mb) entryconfig [msgcat::mc {Bin}] -state normal
+ ConfigureButtons bin normal
} else {
$ds9(mb) entryconfig [msgcat::mc {Bin}] -state disabled
+ ConfigureButtons bin disabled
}
} else {
$ds9(mb) entryconfig [msgcat::mc {Bin}] -state normal
+ ConfigureButtons bin normal
}
set bin(function) [$current(frame) get bin function]
@@ -336,6 +339,7 @@ proc UpdateBinMenu {} {
set bin(buffersize) [$current(frame) get bin buffer size]
} else {
$ds9(mb) entryconfig [msgcat::mc {Bin}] -state disabled
+ ConfigureButtons bin disabled
}
}