1
2
3
4
5
6
7
8
9
10
|
# Tests for comparing directories. -*- tcl -*-
#----------------------------------------------------------------------
# $Revision$
|
<
|
<
>
|
1
2
3
4
5
6
7
8
9
|
#------------------------------------------------------------*- tcl -*-
# Tests for comparing directories.
#----------------------------------------------------------------------
set ::Pref(dir,ignorekey) 0
set ::Pref(dir,comparelevel) 1
set ::eskil(.dirdiff,plugin) ""
proc testCompareFiles {text1 text2 {sametime 0}} {
|