diff options
| author | William Joye <wjoye@cfa.harvard.edu> | 2019-07-26 21:02:35 (GMT) |
|---|---|---|
| committer | William Joye <wjoye@cfa.harvard.edu> | 2019-07-26 21:02:35 (GMT) |
| commit | 419d5b016046e127cc70c6bb8b7c41d8d98888d7 (patch) | |
| tree | 8cd66cc9ea21bc1987800bb4e047be923cdb2b6e /ds9/library/plotdialog.tcl | |
| parent | 4520b599669659243e1e1a5538ad4eaea863b9ad (diff) | |
| download | blt-419d5b016046e127cc70c6bb8b7c41d8d98888d7.zip blt-419d5b016046e127cc70c6bb8b7c41d8d98888d7.tar.gz blt-419d5b016046e127cc70c6bb8b7c41d8d98888d7.tar.bz2 | |
support multiple graphs per plot
Diffstat (limited to 'ds9/library/plotdialog.tcl')
| -rw-r--r-- | ds9/library/plotdialog.tcl | 16 |
1 files changed, 2 insertions, 14 deletions
diff --git a/ds9/library/plotdialog.tcl b/ds9/library/plotdialog.tcl index f4151d5..8182662 100644 --- a/ds9/library/plotdialog.tcl +++ b/ds9/library/plotdialog.tcl @@ -140,7 +140,6 @@ proc PlotDialog {varname wtt} { $var(mb).canvas.layout add radiobutton -label [msgcat::mc {Grid}] \ -variable ${varname}(layout) -value grid \ -command [list PlotChangeLayout $varname] - $var(mb).canvas.layout add separator $var(mb).canvas.layout add radiobutton -label [msgcat::mc {Column}] \ -variable ${varname}(layout) -value column \ -command [list PlotChangeLayout $varname] @@ -148,8 +147,8 @@ proc PlotDialog {varname wtt} { -variable ${varname}(layout) -value row \ -command [list PlotChangeLayout $varname] $var(mb).canvas.layout add separator - $var(mb).canvas.layout add checkbutton -label [msgcat::mc {Lock}] \ - -variable ${varname}(layout,lock) \ + $var(mb).canvas.layout add radiobutton -label [msgcat::mc {Strip}] \ + -variable ${varname}(layout) -value strip \ -command [list PlotChangeLayout $varname] menu $var(mb).canvas.legend @@ -632,17 +631,6 @@ proc PlotUpdateMenus {varname} { } # Canvas - switch $var(layout) { - grid { - $var(mb).canvas.layout entryconfig [msgcat::mc {Lock}] \ - -state disabled - } - row - - column { - $var(mb).canvas.layout entryconfig [msgcat::mc {Lock}] \ - -state normal - } - } # Graph if {[llength $var(graph,dss)] == 0} { |