Changeset 727 for trunk/fillcif.tcl


Ignore:
Timestamp:
Dec 4, 2009 5:11:00 PM (11 years ago)
Author:
toby
Message:

# on 2003/08/11 19:23:12, toby did:
code cleanup -col -> -column

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/fillcif.tcl

    • Property rcs:date changed from 2002/12/30 16:58:18 to 2003/08/11 19:23:12
    • Property rcs:lines changed from +7 -2 to +6 -6
    • Property rcs:rev changed from 1.4 to 1.5
    r663 r727  
    391391set CIF(txt) $file.t
    392392grid [text $CIF(txt) -height 10 -width 80 -yscrollcommand "$file.s set"] \
    393         -col 0 -row 0 -sticky news
    394 grid [scrollbar $file.s -command "$CIF(txt) yview"] -col 1 -row 0 -sticky ns
     393        -column 0 -row 0 -sticky news
     394grid [scrollbar $file.s -command "$CIF(txt) yview"] -column 1 -row 0 -sticky ns
    395395grid columnconfig $file 0 -weight 1
    396396grid rowconfig $file 0 -weight 1
     
    405405set CIF(defBox) $defw.t
    406406grid [text $CIF(defBox) -width 65 -xscrollcommand "$defw.x set" \
    407         -yscrollcommand "$defw.y set"] -col 0 -row 0 -sticky news
    408 grid [scrollbar $defw.y -command "$CIF(defBox) yview"] -col 1 -row 0 -sticky ns
     407        -yscrollcommand "$defw.y set"] -column 0 -row 0 -sticky news
     408grid [scrollbar $defw.y -command "$CIF(defBox) yview"] -column 1 -row 0 -sticky ns
    409409grid [scrollbar $defw.x -command "$CIF(defBox) xview" \
    410         -orient horizontal] -col 0 -row 1 -sticky ew
     410        -orient horizontal] -column 0 -row 1 -sticky ew
    411411grid columnconfig $defw 0 -weight 1
    412412grid rowconfig $defw 0 -weight 1
Note: See TracChangeset for help on using the changeset viewer.