Eskil

Check-in [63c0c5533a]
Login

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

Overview
Comment:Corrected path name
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: 63c0c5533a5de5a1df39300b0da6f42350d738bb95689b171cd0aa4b8dd3040c
User & Date: peter 2021-08-25 12:56:58.074
Context
2021-09-02
11:05
Corrected call check-in: de38e8d7bf user: peter tags: trunk
2021-08-25
12:56
Corrected path name check-in: 63c0c5533a user: peter tags: trunk
2021-05-17
11:52
Sort plugin can sort words inline check-in: 36b17b0bc0 user: peter tags: trunk
Changes
Unified Diff Ignore Whitespace Patch
Changes to src/print.tcl.
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
    trace add variable ::TmpPref write [list PrintTracePrefs $W]
    PrintTracePrefs $W

    # File
    ttk::labelframe $W.lff -text "Output File" -padding 3
    ttk::entryX $W.lff.fne -textvariable ::eskil($top,printFile) -width 30
    ttk::button $W.lff.fnb -text "Browse" \
            -command [list BrowsePrintFileName $top $W.fne]
    grid $W.lff.fne $W.lff.fnb -sticky we -padx 3 -pady 3
    grid columnconfigure $W.lff 0 -weight 1

    if {$::eskil($top,printFile) eq ""} {
        set ::eskil($top,printFile) "~/eskil.pdf"
    }








|







545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
    trace add variable ::TmpPref write [list PrintTracePrefs $W]
    PrintTracePrefs $W

    # File
    ttk::labelframe $W.lff -text "Output File" -padding 3
    ttk::entryX $W.lff.fne -textvariable ::eskil($top,printFile) -width 30
    ttk::button $W.lff.fnb -text "Browse" \
            -command [list BrowsePrintFileName $top $W.lff.fne]
    grid $W.lff.fne $W.lff.fnb -sticky we -padx 3 -pady 3
    grid columnconfigure $W.lff 0 -weight 1

    if {$::eskil($top,printFile) eq ""} {
        set ::eskil($top,printFile) "~/eskil.pdf"
    }