1
2
3
4
5
6
7
8
9
10
|
#! /usr/bin/env tclsh
set teapotservers [list teapot.activestate.com teapot.rkeene.org]
lappend auto_path [file join [file dirname [info script]] lib]
package require teapotclient
proc print_help {} {
puts stderr "Usage: teapot-client get <dir> <os> <cpu> <packages...>"
|
|
|
1
2
3
4
5
6
7
8
9
10
|
#! /usr/bin/env tclsh
set teapotservers [list teapot.rkeene.org teapot.activestate.com]
lappend auto_path [file join [file dirname [info script]] lib]
package require teapotclient
proc print_help {} {
puts stderr "Usage: teapot-client get <dir> <os> <cpu> <packages...>"
|