diff options
| author | hypnotoad <yoda@etoyoc.com> | 2014-10-21 01:20:10 (GMT) |
|---|---|---|
| committer | hypnotoad <yoda@etoyoc.com> | 2014-10-21 01:20:10 (GMT) |
| commit | 80eb226a4cd11f29ef5edbb116522735d1a106c9 (patch) | |
| tree | e2b5c3796642e6d0a72ad175be0b0232d167ede9 /library | |
| parent | 4386c14075b5d2da44f74a354e070f31c91828e8 (diff) | |
| download | tcl-80eb226a4cd11f29ef5edbb116522735d1a106c9.zip tcl-80eb226a4cd11f29ef5edbb116522735d1a106c9.tar.gz tcl-80eb226a4cd11f29ef5edbb116522735d1a106c9.tar.bz2 | |
Fixes to allow a standard tclsh build to do the zip file encoding, instead of
having to do it all through the zip enabled shell.
Diffstat (limited to 'library')
| -rw-r--r-- | library/zvfstools/zvfstools.tcl | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/library/zvfstools/zvfstools.tcl b/library/zvfstools/zvfstools.tcl index 26f17c4..274d5a1 100644 --- a/library/zvfstools/zvfstools.tcl +++ b/library/zvfstools/zvfstools.tcl @@ -21,6 +21,8 @@ package require Tcl 8.6 # or a zipfile using mkzip filename.zip -directory dirname -exclude "*~" # +namespace eval ::zvfs {} + proc ::zvfs::setbinary chan { fconfigure $chan \ -encoding binary \ |