Overview
Comment: | Updated patterns for teapot |
---|---|
Downloads: | Tarball | ZIP archive | SQL archive |
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: | d0d93dc47ed8d61335bb734ad029aa59e797f10c |
User & Date: | rkeene on 2009-04-20 09:31:27 |
Other Links: | manifest | tags |
Context
2009-04-20
| ||
09:47 | Fixed issue with unzipping using UNIX unzip command check-in: e15ee92617 user: rkeene tags: trunk | |
09:31 | Updated patterns for teapot check-in: d0d93dc47e user: rkeene tags: trunk | |
09:29 | Fixed bug in trailing spaces in tclConfig.sh check-in: 8b4636beab user: rkeene tags: trunk | |
Changes
Modified client/lib/teapotclient0.1/teapotclient.tcl from [a2644bf429] to [c530d6879b].
75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 |
set osTeapotToLocal(tcl) [list *] set osTeapotToLocal(linux-*) [list linux] set osTeapotToLocal(win32) [list windows] set osTeapotToLocal(solaris*) [list solaris] set osTeapotToLocal(freebsd) [list freebsd_*] set osTeapotToLocal(irix) [list irix_*] set cpuTeapotToLocal(ix86) [list x86 intel] set cpuTeapotToLocal(sparc) [list sun4*] set cpuTeapotToLocal(universal) [list *] set cpuTeapotToLocal(powerpc) [list ppc] proc download_extensions {rootdir servers extensions os cpu {existingExts ""}} { foreach chkdefext [list Tcl Tk] { if {[lsearch -exact $existingExts $chkdefext] == -1} { |
| |
75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 |
set osTeapotToLocal(tcl) [list *]
set osTeapotToLocal(linux-*) [list linux]
set osTeapotToLocal(win32) [list windows]
set osTeapotToLocal(solaris*) [list solaris]
set osTeapotToLocal(freebsd) [list freebsd_*]
set osTeapotToLocal(irix) [list irix_*]
set cpuTeapotToLocal(ix86) [list x86 intel i?86]
set cpuTeapotToLocal(sparc) [list sun4*]
set cpuTeapotToLocal(universal) [list *]
set cpuTeapotToLocal(powerpc) [list ppc]
proc download_extensions {rootdir servers extensions os cpu {existingExts ""}} {
foreach chkdefext [list Tcl Tk] {
if {[lsearch -exact $existingExts $chkdefext] == -1} {
|