--- loncom/test/filecomparetest.pl 2001/11/17 01:08:55 1.1 +++ loncom/test/filecomparetest.pl 2002/07/14 00:41:40 1.2 @@ -11,7 +11,7 @@ my $dir='fctest'; my %tests=( "perl ../build/filecompare.pl -p $dir/fileA.txt $dir/fileB.txt", - "fctest/fileA.txt\texistence: yes:yes\tcvstime: n/a\tage: 0\tmd5sum: same\tsize: 0\tlines: 0\tdiffs: 0:0", + "$dir/fileA.txt\texistence: yes:yes\tcvstime: n/a\tage: 0\tmd5sum: same\tsize: 0\tlines: 0\tdiffs: 0:0", "perl ../build/filecompare.pl -p $dir/fileA.txt $dir/fileE.txt", "", "perl ../build/filecompare.pl -p $dir/fileA.txt $dir/fileC.txt", @@ -19,13 +19,13 @@ my %tests=( "perl ../build/filecompare.pl -n $dir/fileA.txt $dir/fileB.txt", "", "perl ../build/filecompare.pl -n $dir/fileA.txt $dir/fileE.txt", - "fctest/fileA.txt\texistence: yes:yes\tcvstime: n/a\tage: 0\tmd5sum: different\tsize: 29\tlines: 1\tdiffs: 1:0", + "$dir/fileA.txt\texistence: yes:yes\tcvstime: n/a\tage: 0\tmd5sum: different\tsize: 29\tlines: 1\tdiffs: 1:0", "perl ../build/filecompare.pl -n $dir/fileA.txt $dir/fileC.txt", - "fctest/fileA.txt\texistence: yes:yes\tcvstime: n/a\tage: 0\tmd5sum: different\tsize: -2\tlines: 0\tdiffs: 1:1", + "$dir/fileA.txt\texistence: yes:yes\tcvstime: n/a\tage: 0\tmd5sum: different\tsize: -2\tlines: 0\tdiffs: 1:1", "perl ../build/filecompare.pl -n $dir/fileA.txt $dir/fileF.txt", - "fctest/fileA.txt\texistence: yes:yes\tcvstime: n/a\tage: -3\tmd5sum: different\tsize: 29\tlines: 1\tdiffs: 1:0", + "$dir/fileA.txt\texistence: yes:yes\tcvstime: n/a\tage: -3\tmd5sum: different\tsize: 29\tlines: 1\tdiffs: 1:0", "perl ../build/filecompare.pl -q $dir/fileA.txt $dir/fileF.txt", - "fctest/fileA.txt", + "$dir/fileA.txt", "perl ../build/filecompare.pl -b1 $dir/fileA.txt $dir/fileB.txt", "1", "perl ../build/filecompare.pl -b1 $dir/fileA.txt $dir/fileC.txt", @@ -33,7 +33,7 @@ my %tests=( "perl ../build/filecompare.pl -n $dir/fileA.txt $dir/fileC.txt age", "", "perl ../build/filecompare.pl -n $dir/fileA.txt $dir/fileC.txt age size", - "fctest/fileA.txt\texistence: yes:yes\tcvstime: n/a\tage: 0\tmd5sum: different\tsize: -2\tlines: 0\tdiffs: 1:1", + "$dir/fileA.txt\texistence: yes:yes\tcvstime: n/a\tage: 0\tmd5sum: different\tsize: -2\tlines: 0\tdiffs: 1:1", ); unless (-d $dir) {