various small test, make fixes

diff --git a/Makefile.in b/Makefile.in
index b7d14cd5ebf0f4427494cbfbdb6c3602ac78b3a2..f85f5bd08a0a9fd130f0c8f7040cf00db64fd919 100644 (file)
--- a/Makefile.in
+++ b/Makefile.in
@@ -228,12 +228,6 @@ install-binaries: binaries install-lib-binaries install-bin-binaries
 #========================================================================
 
 install-libraries: libraries
-       $(mkinstalldirs) $(includedir)
-       @echo "Installing header files in $(includedir)"
-       @for i in $(GENERIC_HDRS) ; do \
-           echo "Installing $$i" ; \
-           $(INSTALL_DATA) $$i $(includedir) ; \
-       done;
 
 #========================================================================
 # Install documentation.  Unix manpages should go in the $(mandir)
@@ -245,7 +239,7 @@ install-doc: doc
        $(mkinstalldirs) $(mandir)/man3
        $(mkinstalldirs) $(mandir)/mann
        @echo "Installing documentation in $(mandir)"
-       @for i in $(srcdir)/*.n; \
+       @for i in $(srcdir)/doc/*.n; \
            do \
            echo "Installing $$i"; \
            rm -f $(mandir)/mann/$$i; \

diff --git a/generic/vfs.c b/generic/vfs.c
index ecc69d813c3e0ac70d10243879b64e13ad1b6e31..af6736a47b90cb643aefcb332def74279916442d 100644 (file)
--- a/generic/vfs.c
+++ b/generic/vfs.c
@@ -822,7 +822,7 @@ VfsPathInFilesystem(Tcl_Obj *pathPtr, ClientData *clientDataPtr) {
         * We need this test here both for an empty string being
         * passed in above, and so that if we are testing a unix
         * absolute path /foo/bar we will come around the loop
-        * with splitPosition at 0 for the last test, and we
+        * with splitPosition at 0 for the last iteration, and we
         * must return then.
         */
        if (splitPosition == 0) {

diff --git a/tests/vfs.test b/tests/vfs.test
index 20e93c146a1247212bb71ff0d8b0f256ca3de939..8b65227cf436d4a5ee45c417ec4ef8dabb4e7221 100644 (file)
--- a/tests/vfs.test
+++ b/tests/vfs.test
@@ -18,7 +18,7 @@ if {[lsearch [namespace children] ::tcltest] == -1} {
 package require vfs
 
 proc filelistrelative {filelist} {
-    set dir [file normalize [file dirname [info script]]]
+    set dir [file normalize [file dirname [file dirname [info script]]]]
     set len [string length $dir]
     incr len
     set res {}