* library/vfslib.tcl: Changed memchan condition from Tcl version 8.6 or
authorSteve Huntley <stephen.huntley@alum.mit.edu>
Mon, 17 May 2010 04:18:07 +0000 (04:18 +0000)
committerSteve Huntley <stephen.huntley@alum.mit.edu>
Mon, 17 May 2010 04:18:07 +0000 (04:18 +0000)
greater to presence of chan command (since chan now in later 8.5 builds)

ChangeLog
library/vfslib.tcl

index ebd3ff9ca7b3e4417dbcfba700085cb7b9dc3fd0..b261d85f4c7f7e51f2223dc4e74ee110657cfc7e 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2010-05-16  Steve Huntley  <stephen.huntley@alum.mit.edu>
+
+       * library/vfslib.tcl: Changed memchan condition from Tcl version 8.6 or
+       greater to presence of chan command (since chan now in later 8.5 builds)
+
 2010-02-01  Steve Huntley  <stephen.huntley@alum.mit.edu>
 
        * Makefile.in (PKG_TCL_SOURCES): Added 'template/tclIndex' to the list 
index d44a8c9ff78553cc87b4926957d39219d89de1b1..c03d05c989bc14a3b3e5652c83bc171cd5471b30 100644 (file)
@@ -32,7 +32,7 @@ if {[llength [info command zlib]] || ![catch {load "" zlib}]} {
 # Use 8.6 reflected channels or the rechan package in earlier versions to
 # provide a memory channel implementation.
 #
-if {[package vsatisfies [package provide Tcl] 8.6]} {
+if {[info command ::chan] ne {}} {
 
     # As the core zlib channel stacking make non-seekable channels we cannot
     # implement vfs::zstream and this feature is disabled in tclkit boot.tcl