Added vfs-1.4 file and fixed inclusion of prolog.ps on older versions.

git-svn-id: svn://svn.equi4.com/kitgen/trunk@4454 9e558909-932a-0410-a563-af77432da1eb

diff --git a/files/vfs1.4-pkgIndex.tcl b/files/vfs1.4-pkgIndex.tcl
new file mode 100644 (file)
index 0000000..c3c7b85
--- /dev/null
+++ b/files/vfs1.4-pkgIndex.tcl
@@ -0,0 +1,7 @@
+package ifneeded vfs        1.4   [list load {} vfs]
+package ifneeded starkit    1.3.3 [list source [file join $dir starkit.tcl]]
+package ifneeded vfslib     1.4   [list source [file join $dir vfslib.tcl]]
+package ifneeded vfs::mk4  1.10.1 [list source [file join $dir mk4vfs.tcl]]
+package ifneeded vfs::zip   1.0.1 [list source [file join $dir zipvfs.tcl]]
+package ifneeded vfs::tar   0.91  [list source [file join $dir tarvfs.tcl]]
+

diff --git a/setupvfs.tcl b/setupvfs.tcl
index c7e9fe649d34e66453c4bf35bc2c2b3245685471..dc7a6df75fa9e49a43dc04791c958e1418f9f0da 100644 (file)
--- a/setupvfs.tcl
+++ b/setupvfs.tcl
@@ -152,7 +152,7 @@ set guifiles {
 # handle files no longer present
 foreach f { lib/tk8@/prolog.ps } {
     set fx [string map $versmap $f]
-    if {[file exists build/files/$fx]} {
+    if {[file exists build/$fx]} {
         lappend guifiles $f
     }
 }