Changeset 727
- Timestamp:
- Dec 4, 2009 5:11:00 PM (14 years ago)
- 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 391 391 set CIF(txt) $file.t 392 392 grid [text $CIF(txt) -height 10 -width 80 -yscrollcommand "$file.s set"] \ 393 -col 0 -row 0 -sticky news394 grid [scrollbar $file.s -command "$CIF(txt) yview"] -col 1 -row 0 -sticky ns393 -column 0 -row 0 -sticky news 394 grid [scrollbar $file.s -command "$CIF(txt) yview"] -column 1 -row 0 -sticky ns 395 395 grid columnconfig $file 0 -weight 1 396 396 grid rowconfig $file 0 -weight 1 … … 405 405 set CIF(defBox) $defw.t 406 406 grid [text $CIF(defBox) -width 65 -xscrollcommand "$defw.x set" \ 407 -yscrollcommand "$defw.y set"] -col 0 -row 0 -sticky news408 grid [scrollbar $defw.y -command "$CIF(defBox) yview"] -col 1 -row 0 -sticky ns407 -yscrollcommand "$defw.y set"] -column 0 -row 0 -sticky news 408 grid [scrollbar $defw.y -command "$CIF(defBox) yview"] -column 1 -row 0 -sticky ns 409 409 grid [scrollbar $defw.x -command "$CIF(defBox) xview" \ 410 -orient horizontal] -col 0 -row 1 -sticky ew410 -orient horizontal] -column 0 -row 1 -sticky ew 411 411 grid columnconfig $defw 0 -weight 1 412 412 grid rowconfig $defw 0 -weight 1
Note: See TracChangeset
for help on using the changeset viewer.