Changeset 1547 for trunk/gui/apps/driver


Ignore:
Timestamp:
Jul 8, 2009, 5:42:53 PM (15 years ago)
Author:
gah
Message:

fix double ? and clear plots

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/gui/apps/driver

    r1399 r1547  
    8383# install a better bug handler
    8484Rappture::bugreport::install
    85 
    8685# fix the "grab" command to support a stack of grab windows
    8786Rappture::grab::init
     
    162161# ----------------------------------------------------------------------
    163162set val [$tool xml get tool.reportJobFailures]
    164 if {"" != $val} {
     163if { "" != $val} {
    165164    if {[catch {Rappture::bugreport::shouldReport jobfailures $val} result]} {
    166165        puts stderr "WARNING for reportJobFailures: $result"
     
    300299    set w1 [winfo reqwidth [$win.pager page @1]]
    301300
    302     # if only two windows and they're small enough, put them up side-by-side
    303     if {$w0+$w1 < $screenw && $style != "wizard"} {
    304         $win.pager configure -arrangement side-by-side
    305         $f.analyze configure -holdwindow [$win.pager page @0]
    306 
    307         set type [$tool xml get tool.control]
    308         if {$type == ""} {
    309             set type [$tool xml get tool.control.type]
    310         }
    311 
    312         if {$type == "auto"} {
    313             # in "auto" mode, we don't need a simulate button
    314             $f.analyze configure -simcontrol off
    315         } else {
    316             # not in "auto" mode but side-by-side, we always need the button
    317             $f.analyze configure -simcontrol on
    318         }
     301    if { $style != "wizard" } {
     302        # If only two windows and they're small enough, put them up
     303        # side-by-side
     304        if {$w0+$w1 < $screenw } {
     305            $win.pager configure -arrangement side-by-side
     306            $f.analyze configure -holdwindow [$win.pager page @0]
     307        }
     308    }
     309    set type [$tool xml get tool.control]
     310    if {$type == ""} {
     311        set type [$tool xml get tool.control.type]
     312    }
     313    if { $type == "auto" || $style == "wizard" } {
     314        # in "auto" mode, we don't need a simulate button
     315        $f.analyze configure -simcontrol off
     316    } else {
     317        # not in "auto" mode but side-by-side, we always need the button
     318        $f.analyze configure -simcontrol on
    319319    }
    320320} elseif {[llength [$win.pager page]] > 2} {
Note: See TracChangeset for help on using the changeset viewer.