Fossil SCM

The test file directory saved by the test suite infrastructure should be normalized.

mistachkin 2016-01-13 00:38 trunk
Commit be81a2fd3cd569d044cd94a0be8ce5e3c00448ef
1 file changed +2 -2
+2 -2
--- test/tester.tcl
+++ test/tester.tcl
@@ -21,13 +21,13 @@
2121
#
2222
# Where ../test/tester.tcl is the name of this file and ../bld/fossil
2323
# is the name of the executable to be tested.
2424
#
2525
26
-set testfiledir [file dirname [info script]]
26
+set testfiledir [file normalize [file dirname [info script]]]
2727
set testrundir [pwd]
28
-set testdir [file normalize [file dir $argv0]]
28
+set testdir [file normalize [file dirname $argv0]]
2929
set fossilexe [file normalize [lindex $argv 0]]
3030
set argv [lrange $argv 1 end]
3131
3232
set i [lsearch $argv -halt]
3333
if {$i>=0} {
3434
--- test/tester.tcl
+++ test/tester.tcl
@@ -21,13 +21,13 @@
21 #
22 # Where ../test/tester.tcl is the name of this file and ../bld/fossil
23 # is the name of the executable to be tested.
24 #
25
26 set testfiledir [file dirname [info script]]
27 set testrundir [pwd]
28 set testdir [file normalize [file dir $argv0]]
29 set fossilexe [file normalize [lindex $argv 0]]
30 set argv [lrange $argv 1 end]
31
32 set i [lsearch $argv -halt]
33 if {$i>=0} {
34
--- test/tester.tcl
+++ test/tester.tcl
@@ -21,13 +21,13 @@
21 #
22 # Where ../test/tester.tcl is the name of this file and ../bld/fossil
23 # is the name of the executable to be tested.
24 #
25
26 set testfiledir [file normalize [file dirname [info script]]]
27 set testrundir [pwd]
28 set testdir [file normalize [file dirname $argv0]]
29 set fossilexe [file normalize [lindex $argv 0]]
30 set argv [lrange $argv 1 end]
31
32 set i [lsearch $argv -halt]
33 if {$i>=0} {
34

Keyboard Shortcuts

Open search /
Next entry (timeline) j
Previous entry (timeline) k
Open focused entry Enter
Show this help ?
Toggle theme Top nav button