Fossil SCM
Test refinement.
Commit
0751dbe2dac03793f94a30dda3e9c03e9bdabdc6
Parent
7cefd41a36687c9…
1 file changed
+8
-8
+8
-8
| --- test/symlinks.test | ||
| +++ test/symlinks.test | ||
| @@ -80,18 +80,18 @@ | ||
| 80 | 80 | test symlinks-dir-10 {[file exists [file join $rootDir symdirA f2.txt]] eq 1} |
| 81 | 81 | |
| 82 | 82 | ############################################################################### |
| 83 | 83 | |
| 84 | 84 | fossil open $repository |
| 85 | - | |
| 86 | -test symlinks-dir-11 {[file readlink [file join $rootDir symdirA]] eq \ | |
| 87 | -[file join $rootDir subdirA]} | |
| 88 | - | |
| 89 | -test symlinks-dir-12 {[file exists [file join $rootDir subdirA f1.txt]] eq 1} | |
| 90 | -test symlinks-dir-13 {[file exists [file join $rootDir symdirA f1.txt]] eq 1} | |
| 91 | -test symlinks-dir-14 {[file exists [file join $rootDir subdirA f2.txt]] eq 1} | |
| 92 | -test symlinks-dir-15 {[file exists [file join $rootDir symdirA f2.txt]] eq 1} | |
| 85 | +set code [catch {file readlink [file join $rootDir symdirA]} result] | |
| 86 | + | |
| 87 | +test symlinks-dir-11 {$code == 0} | |
| 88 | +test symlinks-dir-12 {$result eq [file join $rootDir subdirA]} | |
| 89 | +test symlinks-dir-13 {[file exists [file join $rootDir subdirA f1.txt]] eq 1} | |
| 90 | +test symlinks-dir-14 {[file exists [file join $rootDir symdirA f1.txt]] eq 1} | |
| 91 | +test symlinks-dir-15 {[file exists [file join $rootDir subdirA f2.txt]] eq 1} | |
| 92 | +test symlinks-dir-16 {[file exists [file join $rootDir symdirA f2.txt]] eq 1} | |
| 93 | 93 | |
| 94 | 94 | ############################################################################### |
| 95 | 95 | # |
| 96 | 96 | # TODO: Add tests for symbolic links as files here, including tests with the |
| 97 | 97 | # "allow-symlinks" setting on and off. |
| 98 | 98 |
| --- test/symlinks.test | |
| +++ test/symlinks.test | |
| @@ -80,18 +80,18 @@ | |
| 80 | test symlinks-dir-10 {[file exists [file join $rootDir symdirA f2.txt]] eq 1} |
| 81 | |
| 82 | ############################################################################### |
| 83 | |
| 84 | fossil open $repository |
| 85 | |
| 86 | test symlinks-dir-11 {[file readlink [file join $rootDir symdirA]] eq \ |
| 87 | [file join $rootDir subdirA]} |
| 88 | |
| 89 | test symlinks-dir-12 {[file exists [file join $rootDir subdirA f1.txt]] eq 1} |
| 90 | test symlinks-dir-13 {[file exists [file join $rootDir symdirA f1.txt]] eq 1} |
| 91 | test symlinks-dir-14 {[file exists [file join $rootDir subdirA f2.txt]] eq 1} |
| 92 | test symlinks-dir-15 {[file exists [file join $rootDir symdirA f2.txt]] eq 1} |
| 93 | |
| 94 | ############################################################################### |
| 95 | # |
| 96 | # TODO: Add tests for symbolic links as files here, including tests with the |
| 97 | # "allow-symlinks" setting on and off. |
| 98 |
| --- test/symlinks.test | |
| +++ test/symlinks.test | |
| @@ -80,18 +80,18 @@ | |
| 80 | test symlinks-dir-10 {[file exists [file join $rootDir symdirA f2.txt]] eq 1} |
| 81 | |
| 82 | ############################################################################### |
| 83 | |
| 84 | fossil open $repository |
| 85 | set code [catch {file readlink [file join $rootDir symdirA]} result] |
| 86 | |
| 87 | test symlinks-dir-11 {$code == 0} |
| 88 | test symlinks-dir-12 {$result eq [file join $rootDir subdirA]} |
| 89 | test symlinks-dir-13 {[file exists [file join $rootDir subdirA f1.txt]] eq 1} |
| 90 | test symlinks-dir-14 {[file exists [file join $rootDir symdirA f1.txt]] eq 1} |
| 91 | test symlinks-dir-15 {[file exists [file join $rootDir subdirA f2.txt]] eq 1} |
| 92 | test symlinks-dir-16 {[file exists [file join $rootDir symdirA f2.txt]] eq 1} |
| 93 | |
| 94 | ############################################################################### |
| 95 | # |
| 96 | # TODO: Add tests for symbolic links as files here, including tests with the |
| 97 | # "allow-symlinks" setting on and off. |
| 98 |