Fix typo in previous tester.tcl commit.

FossilOrigin-Name: c2e5faca144d2c25aada2a77b4ddefa5ca6ea925

diff --git a/manifest b/manifest
index b6a14c39133939bb927722ff5ce0139a25de41b3..babaee7a3886cec0f397e4a85b402e84ac00fc45 100644 (file)
--- a/manifest
+++ b/manifest
@@ -1,5 +1,5 @@
-C Update\sfilepath_normalize\sfor\sunix.
-D 2011-06-21T19:38:16.805
+C Fix\stypo\sin\sprevious\stester.tcl\scommit.
+D 2011-06-21T19:39:59.899
 F Makefile.arm-wince-mingw32ce-gcc d6df77f1f48d690bd73162294bbba7f59507c72f
 F Makefile.in c1d7a7f4fd8da6b1815032efca950e3d5125407e
 F Makefile.linux-gcc 91d710bdc4998cb015f39edf3cb314ec4f4d7e23
@@ -695,7 +695,7 @@ F test/tclsqlite.test 8c154101e704170c2be10f137a5499ac2c6da8d3
 F test/tempdb.test 19d0f66e2e3eeffd68661a11c83ba5e6ace9128c
 F test/temptable.test f42121a0d29a62f00f93274464164177ab1cc24a
 F test/temptrigger.test b0273db072ce5f37cf19140ceb1f0d524bbe9f05
-F test/tester.tcl 6be56c3d428d37b1d9281adc4c2b81e135c07773
+F test/tester.tcl 7d3d17914ca5397a82f801db733b81d4a82f50c3
 F test/thread001.test a3e6a7254d1cb057836cb3145b60c10bf5b7e60f
 F test/thread002.test afd20095e6e845b405df4f2c920cb93301ca69db
 F test/thread003.test b824d4f52b870ae39fc5bae4d8070eca73085dca
@@ -948,7 +948,7 @@ F tool/symbols.sh bc2a3709940d47c8ac8e0a1fdf17ec801f015a00
 F tool/tostr.awk 11760e1b94a5d3dcd42378f3cc18544c06cfa576
 F tool/vdbe-compress.tcl d70ea6d8a19e3571d7ab8c9b75cba86d1173ff0f
 F tool/warnings.sh 347d974d143cf132f953b565fbc03026f19fcb4d
-P a2a0cd4aa4a6723a849bbba590c22fd065fab55e
-R 8d007d7bee1018ae9fbc8ca3a0089039
+P 30dd4f887989354b5d01cc80bd9c4bd3528d3ae1
+R 084de3a15eae3d4856b5e83a7233fad0
 U shaneh
-Z 6fcb3eb81cefe51f562056bbdbe8ba89
+Z cacbdaf793f85a27b495ae7addf7022f

diff --git a/manifest.uuid b/manifest.uuid
index 0207d8f77241054742df2c201572efb0e97161a9..ceabdb0962b2dc01b6dda482c122e039b09e5afd 100644 (file)
--- a/manifest.uuid
+++ b/manifest.uuid
@@ -1 +1 @@
-30dd4f887989354b5d01cc80bd9c4bd3528d3ae1
\ No newline at end of file
+c2e5faca144d2c25aada2a77b4ddefa5ca6ea925
\ No newline at end of file

diff --git a/test/tester.tcl b/test/tester.tcl
index 972973cdaf031720e32e57ad2ea2bdc848f1fa61..8624821a5e81dc5aab1db6a7dea9b909fe386448 100644 (file)
--- a/test/tester.tcl
+++ b/test/tester.tcl
@@ -356,7 +356,7 @@ proc do_test {name cmd expected} {
 
 proc filepath_normalize {p} {
   # test cases should be written to assume "unix"-like file paths
-  if {$::tcl_platform(platform)=="unix"} {
+  if {$::tcl_platform(platform)!="unix"} {
     # lreverse*2 as a hack to remove any unneeded {} after the string map
     lreverse [lreverse [string map {\\ /} [regsub -nocase -all {[a-z]:[/\\]+} $p {/}]]]
   } {