Check-in [a7c695de5d]
Overview
Comment:Added fix for TclVFS bug 81845
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1:a7c695de5d69865b091966f1ef16160f064de683
User & Date: rkeene on 2016-08-09 15:15:02
Other Links: manifest | tags
Context
2016-09-02
19:56
Fixed issue with 32-bit builds with a 64-bit cross-compiler check-in: 82debae251 user: rkeene tags: trunk
2016-08-09
15:15
Added fix for TclVFS bug 81845 check-in: a7c695de5d user: rkeene tags: trunk
2016-08-04
15:09
Change the order files are copied to the VFS staging directory so packages may override boot.tcl and tclkit.ico more easily check-in: 2b40af4d64 user: rkeene tags: trunk
Changes

Added tclvfs/patches/8.6/tclvfs-20080503-fixbug81845.diff version [e1c1402b39].

            1  +diff -uNr tclvfs-20080503.orig/pkgIndex.tcl.in tclvfs-20080503/pkgIndex.tcl.in
            2  +--- tclvfs-20080503.orig/pkgIndex.tcl.in	2008-04-16 01:59:24.000000000 +0200
            3  ++++ tclvfs-20080503/pkgIndex.tcl.in	2016-01-29 15:01:44.000000000 +0100
            4  +@@ -49,6 +49,7 @@
            5  + package ifneeded vfs::urltype 1.0 [list source [file join $dir vfsUrl.tcl]]
            6  + package ifneeded vfs::webdav  0.1 [list source [file join $dir webdavvfs.tcl]]
            7  + package ifneeded vfs::tk      0.5 [list source [file join $dir tkvfs.tcl]]
            8  ++package ifneeded vfs::utils   0.5 [list source [file join $dir vfsUtils.tcl]]
            9  + #
           10  + # Virtual filesystems based on the template vfs:
           11  + #
           12  +
           13  +diff -uNr tclvfs-20080503.orig/library/vfsUtils.tcl tclvfs-20080503/library/vfsUtils.tcl 
           14  +--- tclvfs-20080503.orig/library/vfsUtils.tcl	2004-07-05 01:42:04.000000000 +0200
           15  ++++ tclvfs-20080503/library/vfsUtils.tcl	2016-01-29 14:45:20.000000000 +0100
           16  +@@ -4,6 +4,7 @@
           17  +
           18  + package require Tcl 8.4
           19  + package require vfs
           20  ++package provide vfs::utils 0.5
           21  +
           22  + namespace eval ::vfs {
           23  +     variable debug 0
           24  +
           25  +diff -uNr tclvfs-20080503.orig/library/zipvfs.tcl tclvfs-20080503/library/zipvfs.tcl 
           26  +--- tclvfs-20080503.orig/library/zipvfs.tcl	2008-04-15 23:11:53.000000000 +0200
           27  ++++ tclvfs-20080503/library/zipvfs.tcl	2016-01-29 15:01:42.000000000 +0100
           28  +@@ -3,6 +3,7 @@
           29  + package provide vfs::zip 1.0.1
           30  +
           31  + package require vfs
           32  ++package require vfs::utils 0.5
           33  +
           34  + # Using the vfs, memchan and Trf extensions, we ought to be able
           35  + # to write a Tcl-only zip virtual filesystem.  What we have below