Changeset 414 for trunk/profcons.tcl


Ignore:
Timestamp:
Dec 4, 2009 5:05:46 PM (14 years ago)
Author:
toby
Message:

# on 2001/09/04 22:03:57, toby did:
adjustable fonts

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/profcons.tcl

    • Property rcs:date changed from 2001/02/22 18:28:06 to 2001/09/04 22:03:57
    • Property rcs:lines changed from +3 -1 to +3 -5
    • Property rcs:rev changed from 1.3 to 1.4
    r372 r414  
    347347    #    grid $top.scroll -sticky ew -column 0 -row 2 -columnspan 4
    348348    # create a scrollable frame inside the canvas
    349     set cfr [frame $top.canvas.fr]
     349    set cfr [frame $top.canvas.fr -class HistList]
    350350    $top.canvas create window 0 0 -anchor nw  -window $cfr
    351351
    … …  
    428428    grid [listbox $cfr.lbp$ic \
    429429            -height [llength $expmap(phaselist)] -width 12 \
    430             -font $expgui(coordfont) \
    431430            -exportselection 0 -selectmode extended] \
    432431            -column $col1 -columnspan 2 -row [incr row 2] -sticky nsew
    … …  
    436435    set expcons(histlistbox$ic) $cfr.lbh$ic
    437436    grid [listbox $cfr.lbh$ic -height 10 -width 12 \
    438             -font $expgui(coordfont) \
    439437            -exportselection 0 -selectmode extended \
    440438            -yscrollcommand " $cfr.sbh$ic set"] \
Note: See TracChangeset for help on using the changeset viewer.