Overview
| Comment: | Fix Win32 portability issue in the VFS installation script regarding the 'null' device name. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | tcl-8.6.1-MinGW-Win32 |
| Files: | files | file ages | folders |
| SHA1: |
ad6d2d103e6f819cc9890386370f5e94 |
| User & Date: | mistachkin on 2013-09-24 22:18:12 |
| Other Links: | branch diff | manifest | tags |
Context
|
2013-09-25
| ||
| 03:12 | Allow building a TclKit on Win32 using MinGW against Tcl/Tk 8.6.1. check-in: a063fafd1f user: mistachkin tags: trunk | |
|
2013-09-24
| ||
| 22:18 | Fix Win32 portability issue in the VFS installation script regarding the 'null' device name. Closed-Leaf check-in: ad6d2d103e user: mistachkin tags: tcl-8.6.1-MinGW-Win32 | |
| 21:28 | Fix format of the MinGW diff file. check-in: 42c98fdbe5 user: mistachkin tags: tcl-8.6.1-MinGW-Win32 | |
Changes
Modified kitsh/buildsrc/kitsh-0.0/installvfs.tcl from [b17724e7c3] to [5bb6ad9ccb].
| ︙ | ︙ | |||
94 95 96 97 98 99 100 |
vfs::unmount /kit
}
"zip" {
set kitfd [open $kitfile a+]
fconfigure $kitfd -translation binary
cd $vfsdir
| > > > > > | | 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 |
vfs::unmount /kit
}
"zip" {
set kitfd [open $kitfile a+]
fconfigure $kitfd -translation binary
cd $vfsdir
if {$tcl_platform(platform) eq "windows"} {
set null NUL
} else {
set null /dev/null
}
set zipfd [open "|zip -r - [glob *] 2> $null"]
fconfigure $zipfd -translation binary
fcopy $zipfd $kitfd
close $kitfd
if {[catch {
close $zipfd
|
| ︙ | ︙ |