Eskil

Check-in [c2ebee038f]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Syntax typo
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: c2ebee038f3b7f2edb8b3a1029bfedfc9bc4beca
User & Date: peter 2007-01-28 13:01:13.000
Context
2007-01-28
13:01
*** empty log message *** check-in: 1637c7422b user: peter tags: trunk
13:01
Syntax typo check-in: c2ebee038f user: peter tags: trunk
12:58
Removed ddtoolbar, added dirdiff filter preferences. check-in: b7d1ae61a5 user: peter tags: trunk
Changes
Unified Diff Ignore Whitespace Patch
Changes to src/print.tcl.
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
    label .pr.hsl -anchor w -text "Header Size"
    spinbox .pr.hss -textvariable ::Pref(printHeaderSize) \
        -from 5 -to 16 -width 3

    label .pr.cll -anchor w -text "Chars per line"
    entry .pr.cle -textvariable ::Pref(printCharsPerLine) -width 4
    frame .pr.clf
    set values [lsort -uniq -integer [list 80 [CountCharsPerLine]]]
    foreach value $values {
        radiobutton .pr.clf.$value -variable ::Pref(printCharsPerLine) \
            -value $value -text $value
        pack .pr.clf.$value -side left
    }

    label .pr.fnl -anchor w -text "File name"







|







460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
    label .pr.hsl -anchor w -text "Header Size"
    spinbox .pr.hss -textvariable ::Pref(printHeaderSize) \
        -from 5 -to 16 -width 3

    label .pr.cll -anchor w -text "Chars per line"
    entry .pr.cle -textvariable ::Pref(printCharsPerLine) -width 4
    frame .pr.clf
    set values [lsort -unique -integer [list 80 [CountCharsPerLine $top]]]
    foreach value $values {
        radiobutton .pr.clf.$value -variable ::Pref(printCharsPerLine) \
            -value $value -text $value
        pack .pr.clf.$value -side left
    }

    label .pr.fnl -anchor w -text "File name"