Overview
| Comment: | Updated example to use single server |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
698e02690e16c76eae90e404f0f8f7d9 |
| User & Date: | rkeene on 2010-02-05 05:14:02 |
| Other Links: | manifest | tags |
Context
|
2010-02-05
| ||
| 05:38 | Switched to force to binary download of packages check-in: 1ee3190643 user: rkeene tags: trunk | |
| 05:14 | Updated example to use single server check-in: 698e02690e user: rkeene tags: trunk | |
| 05:12 | Added support for multiple teapot servers Added teapot.rkeene.org to teapot servers check-in: 80b9e66ca3 user: rkeene tags: trunk | |
Changes
Modified client/examples/example-1.tcl from [4ace071797] to [835098013a].
1 2 3 4 5 6 7 8 |
#! /usr/bin/env tclsh
lappend auto_path [file join [file dirname [info script]] .. lib]
package require teapotclient
puts "The following extensions are available:"
foreach {extension extensioninfo} [::teapotclient::get_extensions \
| | | 1 2 3 4 5 6 7 8 9 10 11 12 |
#! /usr/bin/env tclsh
lappend auto_path [file join [file dirname [info script]] .. lib]
package require teapotclient
puts "The following extensions are available:"
foreach {extension extensioninfo} [::teapotclient::get_extensions \
teapot.activestate.com \
{*} {*}] {
puts " $extension [join $extensioninfo {, }]"
}
|