From 597be23dee12965f4d1bc9aa87a7b1479d4ddfc6 Mon Sep 17 00:00:00 2001 From: Vince Darley Date: Fri, 7 Dec 2001 18:49:46 +0000 Subject: [PATCH] various small test, make fixes --- ChangeLog | 3 +++ tests/vfsFtp.test | 3 +++ tests/vfsUrl.test | 8 ++++++-- 3 files changed, 12 insertions(+), 2 deletions(-) diff --git a/ChangeLog b/ChangeLog index 4c2c825..7f654d4 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,6 @@ +2001-12-07 Vince Darley + * various test, install fixes (unix) thanks to Larry Virden. + 2001-12-02 Vince Darley * 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 { -- 2.23.0