diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-09-22 12:29:46 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-09-22 12:29:46 (GMT) |
| commit | 31b9d1f712fb47f0376a53db5d67d5c2c844d0ce (patch) | |
| tree | 606e2185c7a7474588db263a9b7d994e4ecf7d28 | |
| parent | 25ac7e62ba116fcef8119b89b050bf4e09059af8 (diff) | |
| download | tcl-31b9d1f712fb47f0376a53db5d67d5c2c844d0ce.zip tcl-31b9d1f712fb47f0376a53db5d67d5c2c844d0ce.tar.gz tcl-31b9d1f712fb47f0376a53db5d67d5c2c844d0ce.tar.bz2 | |
Fix a couple of test-cases, since http1.0 is no longer there
| -rw-r--r-- | tests/zipfs.test | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/tests/zipfs.test b/tests/zipfs.test index 5f5b93c..1a5225c 100644 --- a/tests/zipfs.test +++ b/tests/zipfs.test @@ -61,7 +61,7 @@ test zipfs-0.3 {zipfs basics: glob} -constraints zipfs -body { lsort [glob -dir . http*] } -cleanup { cd $pwd -} -result {./http ./http1.0} +} -result {./http} test zipfs-0.4 {zipfs basics: glob} -constraints zipfs -body { set pwd [pwd] @@ -69,23 +69,23 @@ test zipfs-0.4 {zipfs basics: glob} -constraints zipfs -body { lsort [glob -dir [pwd] http*] } -cleanup { cd $pwd -} -result [list $tcl_library/http $tcl_library/http1.0] +} -result [list $tcl_library/http] test zipfs-0.5 {zipfs basics: glob} -constraints zipfs -body { lsort [glob -dir $tcl_library http*] -} -result [list $tcl_library/http $tcl_library/http1.0] +} -result [list $tcl_library/http] test zipfs-0.6 {zipfs basics: glob} -constraints zipfs -body { lsort [glob $tcl_library/http*] -} -result [list $tcl_library/http $tcl_library/http1.0] +} -result [list $tcl_library/http] test zipfs-0.7 {zipfs basics: glob} -constraints zipfs -body { lsort [glob -tails -dir $tcl_library http*] -} -result {http http1.0} +} -result {http} test zipfs-0.8 {zipfs basics: glob} -constraints zipfs -body { lsort [glob -nocomplain -tails -types d -dir $tcl_library http*] -} -result {http http1.0} +} -result {http} test zipfs-0.9 {zipfs basics: glob} -constraints zipfs -body { lsort [glob -nocomplain -tails -types f -dir $tcl_library http*] |
