From: Vince Darley <vincentdarley@sourceforge.net>
Date: Tue, 20 Jan 2004 15:32:01 +0000 (+0000)
Subject: test suite overhaul
X-Git-Tag: vfs-1-4~105
X-Git-Url: http://privyetmir.co.uk/gitweb?a=commitdiff_plain;h=a533f78e742be1fac300d528c37e3aee1b98bf42;p=tclvfs

test suite overhaul
---

diff --git a/tests/vfsArchive.test b/tests/vfsArchive.test
index 338d071..f8090e9 100644
--- a/tests/vfsArchive.test
+++ b/tests/vfsArchive.test
@@ -30,6 +30,8 @@ proc makeAndMountZipArchive {} {
     
     package require vfs::zip
     set mount [vfs::zip::Mount tests.zip tests.zip]
+    #puts "[pwd] ; $::auto_path, [glob *]"
+    pwd
     cd tests.zip
     return [list vfs::zip::Unmount $mount tests.zip]
 }