diff options
author | William Joye <wjoye@cfa.harvard.edu> | 2018-02-13 22:36:30 (GMT) |
---|---|---|
committer | William Joye <wjoye@cfa.harvard.edu> | 2018-02-13 22:36:30 (GMT) |
commit | 425a9149fa34491afa0c01aa63b4003ada051215 (patch) | |
tree | 40714ad504e5a590805cd6973d5ef96b7edabfcd /ds9/library/manalysis.tcl | |
parent | 25b0e0ee78b5a5d8a2088b40299bd7da6706fc05 (diff) | |
download | blt-425a9149fa34491afa0c01aa63b4003ada051215.zip blt-425a9149fa34491afa0c01aa63b4003ada051215.tar.gz blt-425a9149fa34491afa0c01aa63b4003ada051215.tar.bz2 |
fixed an issue with current zoom and block factor and menu selection
Diffstat (limited to 'ds9/library/manalysis.tcl')
-rw-r--r-- | ds9/library/manalysis.tcl | 36 |
1 files changed, 18 insertions, 18 deletions
diff --git a/ds9/library/manalysis.tcl b/ds9/library/manalysis.tcl index 36e8fe4..44d6425 100644 --- a/ds9/library/manalysis.tcl +++ b/ds9/library/manalysis.tcl @@ -121,17 +121,17 @@ proc AnalysisMainMenu {} { -command BlockToFit $ds9(mb).analysis.block add separator $ds9(mb).analysis.block add radiobutton -label "[msgcat::mc {Block}] 1" \ - -variable block(factor) -value { 1 1 } -command ChangeBlock + -variable block(factor) -value {1 1} -command ChangeBlock $ds9(mb).analysis.block add radiobutton -label "[msgcat::mc {Block}] 2" \ - -variable block(factor) -value { 2 2 } -command ChangeBlock + -variable block(factor) -value {2 2} -command ChangeBlock $ds9(mb).analysis.block add radiobutton -label "[msgcat::mc {Block}] 4" \ - -variable block(factor) -value { 4 4 } -command ChangeBlock + -variable block(factor) -value {4 4} -command ChangeBlock $ds9(mb).analysis.block add radiobutton -label "[msgcat::mc {Block}] 8" \ - -variable block(factor) -value { 8 8 } -command ChangeBlock + -variable block(factor) -value {8 8} -command ChangeBlock $ds9(mb).analysis.block add radiobutton -label "[msgcat::mc {Block}] 16" \ - -variable block(factor) -value { 16 16 } -command ChangeBlock + -variable block(factor) -value {16 16} -command ChangeBlock $ds9(mb).analysis.block add radiobutton -label "[msgcat::mc {Block}] 32" \ - -variable block(factor) -value { 32 32 } -command ChangeBlock + -variable block(factor) -value {32 32} -command ChangeBlock menu $ds9(mb).analysis.image $ds9(mb).analysis.image add command \ @@ -231,17 +231,17 @@ proc PrefsDialogAnalysisMenu {w} { menu $m.block $m.block add radiobutton -label "[msgcat::mc {Block}] 1" \ - -variable pblock(factor) -value { 1 1 } + -variable pblock(factor) -value {1 1} $m.block add radiobutton -label "[msgcat::mc {Block}] 2" \ - -variable pblock(factor) -value { 2 2 } + -variable pblock(factor) -value {2 2} $m.block add radiobutton -label "[msgcat::mc {Block}] 4" \ - -variable pblock(factor) -value { 4 4 } + -variable pblock(factor) -value {4 4} $m.block add radiobutton -label "[msgcat::mc {Block}] 8" \ - -variable pblock(factor) -value { 8 8 } + -variable pblock(factor) -value {8 8} $m.block add radiobutton -label "[msgcat::mc {Block}] 16" \ - -variable pblock(factor) -value { 16 16 } + -variable pblock(factor) -value {16 16} $m.block add radiobutton -label "[msgcat::mc {Block}] 32" \ - -variable pblock(factor) -value { 32 32 } + -variable pblock(factor) -value {32 32} pack $f -side top -fill both -expand true } @@ -313,22 +313,22 @@ proc CreateButtonsAnalysis {} { [string tolower [msgcat::mc {Block Fit}]] BlockToFit RadioButton $ds9(buttons).analysis.b1 \ "[string tolower [msgcat::mc {Block}]] 1" \ - block(factor) { 1 1 } ChangeBlock + block(factor) {1 1} ChangeBlock RadioButton $ds9(buttons).analysis.b2 \ "[string tolower [msgcat::mc {Block}]] 2" \ - block(factor) { 2 2 } ChangeBlock + block(factor) {2 2} ChangeBlock RadioButton $ds9(buttons).analysis.b4 \ "[string tolower [msgcat::mc {Block}]] 4" \ - block(factor) { 4 4 } ChangeBlock + block(factor) {4 4} ChangeBlock RadioButton $ds9(buttons).analysis.b8 \ "[string tolower [msgcat::mc {Block}]] 8" \ - block(factor) { 8 8 } ChangeBlock + block(factor) {8 8} ChangeBlock RadioButton $ds9(buttons).analysis.b16 \ "[string tolower [msgcat::mc {Block}]] 16" \ - block(factor) { 16 16 } ChangeBlock + block(factor) {16 16} ChangeBlock RadioButton $ds9(buttons).analysis.b32 \ "[string tolower [msgcat::mc {Block}]] 32" \ - block(factor) { 32 32 } ChangeBlock + block(factor) {32 32} ChangeBlock CheckButton $ds9(buttons).analysis.smooth \ [string tolower [msgcat::mc {Smooth}]] \ |