Changeset 1258 for trunk/gui


Ignore:
Timestamp:
Dec 10, 2008, 12:48:52 PM (16 years ago)
Author:
gah
Message:

removed debugging from pymolproxy, field object (dumping dx file)

Location:
trunk/gui/scripts
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/gui/scripts/editor.tcl

    r440 r1258  
    285285    if {$h+$_loc(y) >= [winfo screenheight $e]} {
    286286        set h [expr {[winfo screenheight $e]-$_loc(y)}]
    287     }
    288 
    289     wm geometry $itk_component(hull) "${w}x${h}+$_loc(x)+$_loc(y)"
     287    }                                   
     288    # Temporary fix to prevent Opps. Don't deal with negative dimensions.
     289    if { $w <= 0 || $h <= 0 } {
     290        wm geometry $itk_component(hull) "+$_loc(x)+$_loc(y)"
     291    } else {
     292        wm geometry $itk_component(hull) "${w}x${h}+$_loc(x)+$_loc(y)"
     293    }
    290294}
    291295
  • trunk/gui/scripts/field.tcl

    r1220 r1258  
    693693            set _comp2style($cname) [$_field get $cname.style]
    694694            incr _counter
     695
    695696        } elseif {$type == "opendx"} {
    696697            #
     
    702703            set data [$_field get -decode yes $cname.opendx]
    703704            set data [Rappture::encoding::decode -as zb64 $data]
    704 
    705             global fcount
    706             if { ![info exists fcount] } {
    707                 set fcount 0
    708             }
    709             incr fcount
    710             set f [open "opendx-$fcount.dx" "w"]
    711             puts $f $data
    712             close $f
    713705
    714706            set data "<ODX>$data"
Note: See TracChangeset for help on using the changeset viewer.