diff options
Diffstat (limited to 'ds9/library/colorbar.tcl')
-rw-r--r-- | ds9/library/colorbar.tcl | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/ds9/library/colorbar.tcl b/ds9/library/colorbar.tcl index 56bf164..2207886 100644 --- a/ds9/library/colorbar.tcl +++ b/ds9/library/colorbar.tcl @@ -1486,11 +1486,13 @@ proc ProcessColorbarCmd {varname iname} { } } -proc ColorbarCmdView {which value} { +proc ColorbarCmdSet {which value {cmd {}}} { global colorbar set colorbar($which) $value - UpdateView + if {$cmd != {}} { + eval $cmd + } } proc ColorbarCmdFontStyle {value} { |