From: Vince Darley <vincentdarley@sourceforge.net>
Date: Fri, 7 Dec 2001 18:49:46 +0000 (+0000)
Subject: various small test, make fixes
X-Git-Tag: vfs-1-2~73
X-Git-Url: https://privyetmir.co.uk/gitweb.cgi?a=commitdiff_plain;h=597be23dee12965f4d1bc9aa87a7b1479d4ddfc6;p=tclvfs

various small test, make fixes
---

diff --git a/ChangeLog b/ChangeLog
index 4c2c825..7f654d4 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,6 @@
+2001-12-07 Vince Darley <vincentdarley@sourceforge.net>
+	* various test, install fixes (unix) thanks to Larry Virden.
+	
 2001-12-02 Vince Darley <vincentdarley@sourceforge.net>
 	* generic/vfs.c: minor code cleanup and simplification. Fix
 	to problem with absolute paths on unix systems introduced in
diff --git a/tests/vfsFtp.test b/tests/vfsFtp.test
index 35b3062..461a716 100644
--- a/tests/vfsFtp.test
+++ b/tests/vfsFtp.test
@@ -21,6 +21,9 @@ if {![auto_load ::vfs::ftp::Mount]} {
       [file dirname [file normalize [info script]]]] library]
 }
 
+puts stdout "These tests require an internet connection, and might"
+puts stdout "take a long time to complete."
+
 test vfsFtp-1.1 {mount and source} {
     set dir [pwd]
     vfs::ftp::Mount ftp://ftp.ucsd.edu/pub/alpha/ localmount
diff --git a/tests/vfsUrl.test b/tests/vfsUrl.test
index b367ade..cb32d75 100644
--- a/tests/vfsUrl.test
+++ b/tests/vfsUrl.test
@@ -21,6 +21,9 @@ if {![auto_load ::vfs::urltype::Mount]} {
       [file dirname [file normalize [info script]]]] library]
 }
 
+puts stdout "These tests require an internet connection, and might"
+puts stdout "take a long time to complete."
+
 test vfsUrl-1.1 {mount} {
     vfs::urltype::Mount ftp
 } {Mounted at "ftp://"}
@@ -68,8 +71,9 @@ test vfsUrl-2.2 {auto-mount bad ftp} {
     set res
 } {file doesn't exist}
 
-test vfsUrl-3.1 {mount} {
-} {}
+test vfsUrl-3.1 {mount http} {
+    vfs::urltype::Mount http
+} {Mounted at "http://"}
 
 # cleanup
 catch {