Eskil

Check-in [a0f5e3bef4]
Login

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

Overview
Comment:Dir compare always yield equal now.
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: a0f5e3bef487fe59d084bb496af2b50bd7dc9b13
User & Date: peter 2007-02-17 04:31:48.000
Context
2007-02-17
04:32
Include pdf4tcl and snit in the kit. check-in: 908559cccf user: peter tags: trunk
04:31
Dir compare always yield equal now. check-in: a0f5e3bef4 user: peter tags: trunk
04:30
Mount kits readonly. Added pdf print check-in: ae384b8408 user: peter tags: trunk
Changes
Unified Diff Ignore Whitespace Patch
Changes to tests/dir.test.
︙︙
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143

    file mkdir _d2_
    touch _d2_/_f2_

    set res [CompareFiles _f1_ _d1_]
    append res [CompareFiles _d1_ _d2_]
} -cleanup {
    file delete -force _f1_ _d1_ _d2_
} -result {00}

test dir-6.1 {
    CompareFiles, binary
} -body {
    set ::Pref(comparelevel) 1b
    set res [testCompareFiles "short" "longer"]
} -cleanup {








|








129
130
131
132
133
134
135
136
137
138
139
140
141
142
143

    file mkdir _d2_
    touch _d2_/_f2_

    set res [CompareFiles _f1_ _d1_]
    append res [CompareFiles _d1_ _d2_]
} -cleanup {
    file delete -force _f1_ _d1_ _d2_
} -result {01}

test dir-6.1 {
    CompareFiles, binary
} -body {
    set ::Pref(comparelevel) 1b
    set res [testCompareFiles "short" "longer"]
} -cleanup {
︙︙