TclVFS

Check-in [b1ee541d05]
Login
Bounty program for improvements to Tcl and certain Tcl packages.

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:2008-10-20 Steve Huntley <[email protected]> * tclIndex: Corrected version number. * pkgIndex.tcl.in: Edited to replace function of deleted pkgIndex.tcl in template subdir.
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: b1ee541d0508bc384c0ed67b404deae90547f805
User & Date: blacksqr 2009-10-20 08:16:36
Context
2010-01-30
08:22
2010-01-30 Steve Huntley <[email protected]> * templatevfs.tcl: workaround for bug in how virtual volumes are mounted. Version bumped to 1.5.4. See: http://sf.net/tracker/?func=detail&aid=2886914&group_id=10894&atid=110894 check-in: 5cb781db78 user: blacksqr tags: trunk
2009-10-20
08:16
2008-10-20 Steve Huntley <[email protected]> * tclIndex: Corrected version number. * pkgIndex.tcl.in: Edited to replace function of deleted pkgIndex.tcl in template subdir. check-in: b1ee541d05 user: blacksqr tags: trunk
2009-10-16
05:40
2008-10-15 Steve Huntley <[email protected]> vfs::template package update ver. 1.5.3: * templatevfs.tcl: Incorporated AK's fix below. * collatevfs.tcl: ensured binary file contents got written correctly, and ensured that not only file contents but also file attributes were updated to all write targets. check-in: ff8d467939 user: blacksqr tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to ChangeLog.







1
2
3
4
5
6
7





2008-10-15  Steve Huntley  <[email protected]>

	vfs::template package update ver. 1.5.3:

	* templatevfs.tcl: Incorporated AK's fix below.
	* collatevfs.tcl: ensured binary file contents got written
	correctly, and ensured that not only file contents but 
>
>
>
>
>
>







1
2
3
4
5
6
7
8
9
10
11
12
13
2008-10-20  Steve Huntley  <[email protected]>

	* tclIndex: Corrected version number.
	* pkgIndex.tcl.in: Edited to replace function of deleted 
	pkgIndex.tcl in template subdir.

2008-10-15  Steve Huntley  <[email protected]>

	vfs::template package update ver. 1.5.3:

	* templatevfs.tcl: Incorporated AK's fix below.
	* collatevfs.tcl: ensured binary file contents got written
	correctly, and ensured that not only file contents but 

Changes to library/template/tclIndex.

2
3
4
5
6
7
8
9
10
11
12
13
14
15
# This file is generated by the "auto_mkindex" command
# and sourced to set up indexing information for one or
# more commands.  Typically each line is a command that
# sets an element in the auto_index array, where the
# element name is the name of a command and the value is
# a script that loads the command.

set auto_index(::vfs::template::mount) [list package require vfs::template 1.5.2]
set auto_index(::vfs::template::collate::mount) [list source [file join $dir collatevfs.tcl]]
set auto_index(::vfs::template::quota::mount) [list source [file join $dir quotavfs.tcl]]
set auto_index(::vfs::template::version::mount) [list source [file join $dir versionvfs.tcl]]
set auto_index(::vfs::template::version::delta::mount) [list source [file join $dir deltavfs.tcl]]
set auto_index(::vfs::template::chroot::mount) [list source [file join $dir chrootvfs.tcl]]
set auto_index(::vfs::template::fish::mount) [list source [file join $dir fishvfs.tcl]]






|






2
3
4
5
6
7
8
9
10
11
12
13
14
15
# This file is generated by the "auto_mkindex" command
# and sourced to set up indexing information for one or
# more commands.  Typically each line is a command that
# sets an element in the auto_index array, where the
# element name is the name of a command and the value is
# a script that loads the command.

set auto_index(::vfs::template::mount) [list package require vfs::template 1.5.3]
set auto_index(::vfs::template::collate::mount) [list source [file join $dir collatevfs.tcl]]
set auto_index(::vfs::template::quota::mount) [list source [file join $dir quotavfs.tcl]]
set auto_index(::vfs::template::version::mount) [list source [file join $dir versionvfs.tcl]]
set auto_index(::vfs::template::version::delta::mount) [list source [file join $dir deltavfs.tcl]]
set auto_index(::vfs::template::chroot::mount) [list source [file join $dir chrootvfs.tcl]]
set auto_index(::vfs::template::fish::mount) [list source [file join $dir fishvfs.tcl]]

Changes to pkgIndex.tcl.in.

28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46

47
48
49
50
51
52
53
54
package ifneeded vfs::test    1.0 [list source [file join $dir testvfs.tcl]]
package ifneeded vfs::urltype 1.0 [list source [file join $dir vfsUrl.tcl]]
package ifneeded vfs::webdav  0.1 [list source [file join $dir webdavvfs.tcl]]
package ifneeded vfs::tk      0.5 [list source [file join $dir tkvfs.tcl]]
#
# Virtual filesystems based on the template vfs:
#
package ifneeded vfs::template::chroot 1.5.2 \
    [list source [file join $dir template chrootvfs.tcl]]
package ifneeded vfs::template::collate 1.5.2 \
    [list source [file join $dir template collatevfs.tcl]]
package ifneeded vfs::template::version 1.5.2 \
    [list source [file join $dir template versionvfs.tcl]]
package ifneeded vfs::template::version::delta 1.5.2 \
    [list source [file join $dir template deltavfs.tcl]]
package ifneeded vfs::template::fish 1.5.2 \
    [list source [file join $dir template fishvfs.tcl]]
package ifneeded vfs::template::quota 1.5.2 \
    [list source [file join $dir template quotavfs.tcl]]

package ifneeded vfs::template 1.5.3 \
    [list source [file join $dir template templatevfs.tcl]]
#
# Helpers
#
package ifneeded fileutil::globfind 1.5 \
    [list source [file join $dir template globfind.tcl]]
package ifneeded trsync 1.0 [list source [file join $dir template tdelta.tcl]]






|
<
<
<
<
<
<
|
<
<
<
<
>








28
29
30
31
32
33
34
35






36




37
38
39
40
41
42
43
44
45
package ifneeded vfs::test    1.0 [list source [file join $dir testvfs.tcl]]
package ifneeded vfs::urltype 1.0 [list source [file join $dir vfsUrl.tcl]]
package ifneeded vfs::webdav  0.1 [list source [file join $dir webdavvfs.tcl]]
package ifneeded vfs::tk      0.5 [list source [file join $dir tkvfs.tcl]]
#
# Virtual filesystems based on the template vfs:
#
if {[lsearch -exact $::auto_path [file join $dir template]] == -1} {






    lappend ::auto_path [file join $dir template]




}
package ifneeded vfs::template 1.5.3 \
    [list source [file join $dir template templatevfs.tcl]]
#
# Helpers
#
package ifneeded fileutil::globfind 1.5 \
    [list source [file join $dir template globfind.tcl]]
package ifneeded trsync 1.0 [list source [file join $dir template tdelta.tcl]]