Changeset 1547 for trunk/gui/apps/driver
- Timestamp:
- Jul 8, 2009, 5:42:53 PM (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gui/apps/driver
r1399 r1547 83 83 # install a better bug handler 84 84 Rappture::bugreport::install 85 86 85 # fix the "grab" command to support a stack of grab windows 87 86 Rappture::grab::init … … 162 161 # ---------------------------------------------------------------------- 163 162 set val [$tool xml get tool.reportJobFailures] 164 if { "" != $val} {163 if { "" != $val} { 165 164 if {[catch {Rappture::bugreport::shouldReport jobfailures $val} result]} { 166 165 puts stderr "WARNING for reportJobFailures: $result" … … 300 299 set w1 [winfo reqwidth [$win.pager page @1]] 301 300 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 319 319 } 320 320 } elseif {[llength [$win.pager page]] > 2} {
Note: See TracChangeset
for help on using the changeset viewer.